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PLANO DA OBRA 


“INPUT” é uma obra editada em fascículos semanais, e cada 
conjunto de 15 fascículos compõe um volume. A capa para enca- 
dernação de cada volume estará à venda oportunamente. 


COMPLETE SUA COLEÇÃO 


Exemplares atrasados, até seis meses após o encerramento da coleção, pode- 
rão ser comprados, a preços atualizados, da seguinte forma: 1. PESSOAL 
MENTE — Por meio de seu jornaleiro ou dirigindo-se ao distribuidor local, 
cujo endereço poderá ser facilmente conseguido junto a qualquer jornaleiro 
de sua cidade. Em São Paulo, os endereços são: rua Brigadeiro Tobias, 773, 
Centro; avenida Industrial, 117, Santo André; e no Rio de Janeiro: avenida 
Mem de Sá, 191/193, Centro. 2. POR CARTA — Poderão ser solicitados exem- 
plares atrasados também por carta, que deve ser enviada para DINAP — Dis- 
tribuidora Nacional de Publicações — Números Atrasados — Estrada Velha 
de Osasco, 132, Jardim Teresa — CEP 06000 — Osasco — SP, Não envie pa- 
gamento antecipado. O atendimento será feito pelo reembolso postal e o pa- 
gamento, incluindo as despesas postais, deverá ser efetuado ao se retirar a en- 
comenda na agência do Correio. 3. POR TELEX — Utilize o nº (011) 33 670 
DNAP. 

Em Portugal, os pedidos devem ser feitos à Distribuidora Jardim de Publica- 
ções, Lda. — Qta. Pau Varais, Azinhaga de Fetais — 2 685, Camarate — Lis- 
boa; Apartado 57 — Telex 43 069 JARLIS P. 

Atenção: Após seis meses do encerramento da coleção, os pedidos serão aten- 
didos dependendo da disponibilidade do estoque. 

Obs.: Quando pedir livros, mencione sempre título e/ou autor da obra, além 
do número da edição. 
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As cobras ainda não constituem ameaça: 
podem ser vistas dentro dos buracos, 
mas estão sempre quietas. Agora vamos 
dar-lhes movimento, complicando 

um pouco mais a vida do pobre Willie. 


Nossa aventura está bem movimen- 
tada: Willie anda e salta, as pedras ro- 


lam, os pássaros voam, As cobras, po- 
rém, permanecem totalmente imóveis 
em seus buracos. Está na hora de lhes 
dar um pouco de vida. 


A rotina a seguir atiça as cobras, 
fazendo-as sair de sua inatividade. 


10 REM orq 59823 


20 
30 
40 
50 
60 
70 
BO 


100 
110 
120 
130 


REM 
REM 
REM 
REM 
REM 
REM 
REM 


REM 
REM 


REM 





NÍVEL DO JOGO 

O ATRASO DAS COBRAS 
MOVIMENTO DAS LÍNGUAS 
A COBRA ESTÁ SUBMERSA? 
SINCRONISMO 
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gnk ld a, (57344) 
CP 2 

jr nec,esko 

ret 

Bko ld 1x,5/350 
ld h1,425 

call skm 

ld h1,369 

call skm 

ld h1,282 

call skm 

ret 
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140 REM skm push hl 
150 REM ld de, (57354) 
160 BEM sbc hl,de 
170 REM pop hi 

180 REM jr c,ens 

190 REM ret 

200 REM sns ld a, (ix+0) 
210 REM inc a 

220 REM res d,a 

230 REM ld (ix+0),a 
240 REM inc ix 

250 REM cp 7 

260 REM jr nc,sco 
270 REM ret 

280 REM sco ld bc,57224 
290 REM ld d,43 

300 REM cp 15 

310 REM jr nz,ate 
320 REM ld bc, 15616 
330 REM ld d,4s 

340 REM ste ld a,dá 
350 REM call 58217 
360 REM ret 


A primeira tarefa da rotina consiste 
em verificar se as cobras devem entrar 
em ação. Para isso, o valor do nível do 
jogo, armazenado em 57344, é carrega- 
do no acumulador e comparado com 2. 
Essa comparação é feita por meio de 
uma subtração cujo resultado não arma- 
zenamos. Se compararmos 2 com um 
número menor, teremos um resto. A ba- 
liza carry será então ajustada com 1 e 
o processador retornará, porque as co- 
bras não são necessárias. 

Se a baliza carry não foi ajustada, a 
instrução jr nc,sko pula a instrução ret. 
Você estará no terceiro ou quarto nível 
do jogo (valor 2 ou 3) e as cobras de- 
vem ser atiçadas. 





AS COBRAS AMEAÇAM 


A posição de memória 57350 carre- 
ga o primeiro dos atrasos das cobras, 
que indicam quando elas devem mexer 
a língua. IX é carregado com esse ende- 
reço, e HL, com 425, a posição da pri- 
meira língua de cobra. A rotina skm, 
que executa o movimento, é chamada. 

A posição da língua da próxima co- 
bra é carregada em HL, e skm volta a ser 
chamada. Em seguida, a posição da lín- 
gua da terceira cobra é carregada em HL 
e skm é chamada mais uma vez. 

Quando todas as línguas estiverem se 
mexendo, a rotina retorna. 


SE A MARÉ SOBE... 





Quando a rotina skm é chamada, as 
posições das línguas são colocadas na pi- 
lha para armazenamento temporário. A 
posição do mar em 57354 é colocada no 
par DE. Neste ponto do programa, pre- 


cisamos verificar a altura da maré. Se 
a cobra estiver submersa, a parte da ro- 
tina que movimenta sua língua pode ser 
pulada. 

A seguir, a posição do mar no par 
DE é subtraída da posição da lingua em 
HL. Se não houver resto, a posição do 
mar se encontra acima da posição da 
língua da cobra na tela. Nesse caso, a 
instrução jr c,sns não tem efeito e o pro- 
cessador retorna. Mas, se houver resto, 
ou seja, se a posição do mar estiver abai- 
xo da posição da língua na tela, a ins- 
trução jr c,sns faz com que o proces- 
sador salte a instrução ret e continue 
a rotina. 





ESTÁ NA HORA DE MEXER? 


O atraso da cobra é carregado da po- 
sição apontada por IX para o acumula- 
dor, onde é incrementado. O bit 4 é apa- 
gado para evitar que o atraso se torne 
maior que 15. O resultado dessa opera- 
ção é armazenado de volta na posição 
indicada por IX. Esse apontador é en- 
tão incrementado para indicar o atraso 
da cobra seguinte. Seu valor é compa- 
rado com o conteúdo do acumulador 
pela instrução cp 7. Se o atraso dessa co- 
bra for maior ou igual a 7, jr ne,sno 
manda o processador para a rotina que 
imprime a língua. Se o valor for menor 
que 7, a baliza carry é ajustada com 1, 
a instrução não tem efeito e o processa- 
dor retorna. 

Cada vez que essa rotina é chamada, 
um atraso diferente da cobra é encon- 
trado nos endereços 57350, 57351 e 
57352, pois o apontador IX é incremen- 
tado entre cada chamada que se faz à 
rotina skm. A língua da cobra fica para 
fora oito ciclos, e não aparece nos oito 
ciclos seguintes. 





IMPRESSÃO 





Chegamos, finalmente, à rotina en- 
carregada de imprimir ou apagar a lín- 
gua da cobra na tela. O par de registros 
BC é carregado com 57224, os dados pa- 
ra a língua da cobra. D é ajustado com 
43, a cor da figura. O atraso da cobra 
em A é comparado com 15. 

Se o atraso não tiver chegado a 15, 
a instrução jr nz leva o processador pa- 






































ra ste. Se for igual a esse valor, você pre- 
cisará apagar a língua, para que ela não 
apareça nos próximos oito ciclos. BC é 
carregado com 15616, o endereço dos 
dados de um espaço vazio, e O registro 
D é carregado com 45, o código da cor 
do céu. 

Qualquer que seja o valor do atraso 
da cobra (neste ponto da rotina, ele é 
sempre maior do que sete), o processa- 
dor encontra a instrução Id a,d. Depois 
que ela carrega a cor apropriada em A, 
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a rotina print, em 58217, é chamada. 
Com isso, imprimimos a língua — ou 
apagamos a que existia — para fora da 
boca de uma das cobras. A seguir, O 
processador retorna, 


o DE 


Esta rotina movimenta as cobras, 
acrescentando ação ao Jogo. 


10 ORG 20856 


Es e o o Mn ni 
| k | 
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Em R 


SNK LDA 18238 
CMPA 42 
BHS SKO 
RTS 
SKO 
LDX 
JSR SKM 
LDX 44591 
JSR SKM 
LDX 43833 
JSR SKM 
RTS 
SKM PSHS X 


LDY 418255 
45095 








PROGRAMAS LONGOS: MELHORE 
A VELOCIDADE DE MONTAGEM 
Como o leitor deve ter notado, apre- 
sentamos o programa Avalanche em 
pequenos segmentos funcionais, que 
podem ser testados separadamente. 


Essa técnica de construção de progra- 


mas, chamada de desenvolvimento 
modular, é muito útil para qualquer ti- 
po de programa, pois agiliza o proces- 
| so de montagem e facilita enormemen- 
| te os testes de execução. Para a pro- 
gramação complexa em linguagem de 
máquina, o uso dessa técnica é essen- 
cial, devido à dificuldade de se docu- 
| mentar internamente — isto é, na pró- 
pria listagem do programa — o código 
em Assembler. 

Os profissionais que criam os sofis- 
ticados videogames que vemos em fli- 
peramas, por exemplo, dominam per- 
feitamente a técnica de modularização. 
Na realidade, eles dispõem de progra- 
mas Assembler poderosíssimos, capa- 
zes de representar uma biblioteca de 
rotinas e ferramentas de programação 
que facilitam muito a implementação 
dos recursos normalmente usados em 
videogames. 

Infelizmente, os Assembler que /N- 
PUT apresentou para os diferentes mi- 
cros são muito lentos. Se você quiser 
melhorar a velocidade de montagem, 
divida um programa mais longo em 
segmentos menores e compile-os se- 
paradamente. Não se esqueça, porém, 
de calcular o endereço de origem para 


cada segmento e incluílo em um co- | 


mando org ou equivalente, no começo 
de cada segmento. 





150 LDX 18247 
160 LEAX 31,X 
170 CMPX ,5 
180 PULS X 
190 BHI SNS 
200 RTS 
210 SNS LDA ,Y 
220 INCA 
230 ANDA 45SF 
240 STA ,Y+ 
250 CMPA +47 
260 BHS SCO 
270 RTS 
280 SCO LDU 418062 
290 CMPA 415 
300 BNE STE 
310 LDU 41536 
320 STE LEAX -256,X 
330 JSR CHARPR 
340 RTS 
CHARPR EQU 19402 


350 





A primeira tarefa da rotina é verifi- 
car se as cobras devem entrar em ação. 
Para isso, o valor do nível do jogo, ar- 
mazenado em 18238, é carregado no 
acumulador e comparado com 2. 

Se você está no nível três ou quatro 
— OU seja, se O valor é 2 ou 3 —, as co- 
bras serão necessárias. Nesse caso, a ins- 
trução BHS faz o processador pular o 
RTS, seguindo a rotina. 





AS COBRAS AMEAÇAM 


Y é carregado com o endereço do 
atraso da primeira cobra. Esta é a va- 
riável incumbida de interromper ou co- 
meçar o seu movimento. Os atrasos da 
segunda e da terceira cobras estão logo 
em seguida na memória. 

X é carregado com 5095, a posição 
na tela do primeiro buraco, e o proces- 
sador vai para a rotina SKM. 

Essa rotina atiça a primeira cobra e 
incrementa o conteúdo de Y antes de re- 
tornar. Assim, quando o processador 
salta para fazer com que a segunda e a 
terceira cobras se movimentem, apenas 
as posições do segundo € do terceiro bu- 
racos precisam ser carregadas em X. Y 
é incrementado automaticamente, apon- 
tando os atrasos das três cobras. Quan- 
do tiver passado por todas elas, o pro- 
cessador retorna. 


MARÉ ALTA 





A primeira coisa que o processador 
faz ao entrar na rotina SKM é colocar 
na pilha, para armazenamento tempo- 
rário, a posição da cobra na tela. 

O registrador X é carregado com o 
conteúdo de 18247, a posição do mar. 
Esse valor é somado com 31, para que 
o apontador de tela se mova para o can- 
to direito da tela. X é então comparado 

com a posição do buraco da cobra, que 
está na pilha de máquina, através da ins- 
trução CMPX ,S. A posição da cobra 
é recuperada da pilha, voltando para o 
registrador X. 

Como isso não afeta nenhuma das 
balizas, a instrução BHI ainda se refere 
à operação CMPX ,S. Assim, se o mar 
está acima do buraco — ou seja, se à po- 
sição do mar na tela não é maior do que 
a posição do buraco que estava na pi- 
lha —, o salto não ocorre, e o processa- 
dor retorna. 

Caso o mar não tenha encoberto o 
buraco — isto é, se a posição do mar na 
tela é maior do que a posição do bura- 
co —, o processador pula a instrução 
RTS, e dá continuidade à rotina que ati- 
ça as cobras. 





MEXER OU NÃO MEXER 


A é carregado com o conteúdo do 
atraso da cobra que está apontado no 
registrador Y. Esse valor é então incre- 
mentado e a operação AND é feita com 
$F, para ajustá-lo com O toda vez que 
ultrapassar o valor 15. 

O resultado é armazenado de volta 
no endereço apontado por Y. Esse re- 
gistrador é então incrementado para 
apontar o atraso da próxima cobra. 

O atraso da cobra que ainda está em 
A é comparado com 7. Se for maior ou 
igual, o processador vai para a rotina de 
impressão da língua; caso contrário, o 
processador retorna. 





Ao entrar na rotina SCO, o proces- 
sador carrega o apontador da pilha do 
usuário com 18062, o endereço dos da- 
dos para a língua da cobra. 

A — que ainda contém o atraso da 
cobra que foi incrementado — é com- 
parado com 15. Se ele não foi incremen- 
tado até esse valor, o processador pula 
para as instruções de impressão. Mas, 
se já chegou a 15, U é carregado com 
1536, o endereço da parte de céu no can- 
to superior esquerdo da tela. 

Seguindo adiante, X é subtraído de 
256, fazendo o apontador de tela se mo- 
ver um caractere para cima do buraco 
da cobra. Esta é a posição da língua. 

Se o atraso da cobra estiver entre 7 
e 14, a rotina CHARPR imprimirá a lin- 
gua nessa posição ao ser chamada. Mas, 
se o atraso tiver atingido o valor 15, a 
língua será apagada. 

A língua permanecerá invisível, isto 
e, não será impressa, até que o atraso 
chegue novamente a 7. 


o, EE AS 


A rotina apresentada a seguir atiça as 
cobras que até agora permaneciam quie- 
tas em seus buracos. 


10 org 55564 
20 ld a, (-5228) 


30 Cp 2 
40 yr nc,sk 
50 ret 


60 sk ld bc,-5198 
70 ld h1,425 

80 call sm 

90 ld h1,369 

100 call am 

110 ld h1,282 

120 call sm 

130 ret 

140 sm push hl 
150 ld de, (-5212) 








160 sbc hl,de 
170 pop hl 
180 jr c,sn 
190 ret 

200 gn ld a, (bc) 
210 inc a 

220 res 4,a 
230 ld (bc),a 
240 inc bc 
250 Cp / 

260 jr nc,sc 
270 ret 

280 ec ld de, (62407) 
290 add hl,de 
300 cp 15 

310 ld b,36 
320 jr nz,est 
330 ld b,255 
340 st ld a,b 
350 call 77 
360 ret 

370 end 


A primeira tarefa da rotina consiste 
em verificar se as cobras devem entrar 
em ação no nível atual do jogo. Para is- 
so, O valor do nivel, — 5228, é carrega- 
do no acumulador e comparado com 2. 
Se você está no terceiro ou no quarto ní- 
vel — ou seja, se o valor é2 ou 3 — as 
cobras estão nos buracos e devemos 
atiçá-las. 

A comparação é feita por meio de 
uma subtração cujo resultado não arma- 
zenamos. Se compararmos 2 com um 
número menor, teremos um resto e a ba- 
liza carry passará a conter 1. Nesse ca- 
so, O processador retornará, porque as 
cobras não são necessárias. 

Caso a baliza carry não tenha sido 
afetada, a instrução jr nc,sk pula a ins- 
trução ret, porque as cobras estão pre- 
sentes neste nível. 


AS COBRAS AMEAÇAM 


O endereço de memória — 5198 con- 
tém o primeiro dos chamados atrasos 
das cobras, que indicam quando elas de- 
vem mostrar sua língua. O par BC é car- 
regado com esse endereço, e HL, com 
425, a posição da língua da primeira co- 
bra. A rotina sm, encarregada de pro- 
mover o movimento, é chamada. 

A posição da língua da próxima co- 
bra é carregada em HL, e sm volta a ser 
chamada. Em seguida, a posição da lín- 
gua da terceira cobra é carregada em 
HL, e sm é chamada mais uma vez. 

Depois de movimentar todas as lin- 
guas, a rotina retorna. 


MARÉ ALTA 





Quando a rotina sm é chamada, a po- 
sição da língua que está em HL é colo- 





cada na pilha para armazenamento tem- 
porário. A posição do mar em —5212 
é colocada no par DE. Neste ponto do 
programa, precisamos verificar se a co- 
bra se afogou com a subida da maré. 
Em caso afirmativo, ela não precisa me- 
xer a língua — assim, a parte da rotina 
que faz isso pode ser pulada. 

Para essa verificação, a posição do 
mar no par DE é subtraída da posição 
da lingua em HL. Se não houver resto 
— ou seja, se a posição do mar estiver 
acima da posição da lingua da cobra 
na tela —, a instrução jr c,sn não tem 
efeito e o processador retorna. Mas, se 
houver resto, a posição do mar está 
abaixo da posição da língua na tela. A 
instrução jr c,sn faz, então, o proces- 
sador saltar a instrução ret e continuar 
a rotina. 





ESTÁ NA HORA DE MEXER? 


O atraso da cobra é carregado da po- 
sição apontada por BC para o acumu- 
lador, onde é incrementado. O bit 4 
também é incrementado para evitar que 
o atraso se torne maior que 15. O resul- 
tado dessa operação é armazenado de 
volta na posição apontada por BC. 

O par de registros BC é incrementa- 
do para apontar o atraso da cobra se- 
guinte. A instrução cp 7 compara esse 
valor com o conteúdo do acumulador, 
e a instrução jr nc,sc manda o proces- 
sador para a rotina que imprime a lín- 
gua, se o atraso da cobra for maior ou 
igual a 7. Caso o valor seja inferior a 
7, a baliza é ajustada com 1, a instru. 
ção de desvio não tem efeito e o proces- 
sador retorna. 





be 


e E =3 


E “un 


Ao ser chamada, essa rotina sempre 
encontra um atraso diferente nos ende 
reços — 5198, — 5199 e — 5220, já que 
o apontador BC é incrementado entre 
cada acesso a sm. A língua da cobra fi- 
ca para fora oito ciclos, não aparecen- 
do nos oito seguintes. 





IMPRESSÃO 





"* Chegamos, finalmente, à rotina que 
imprime ou apaga a língua da cobra na 
tela. O endereço inicial da Tabela de No- 
mes da VRAM é carregado em DE e so- 
mado a HL, que contém a posição da 
língua. Esse par de registros passa en- 
tão a conter o endereço correspondente 
a posição da língua na TN. 

O atraso da cobra que ainda está no 
acumulador é comparado com 15. O re- 
gistro B é carregado com 36, o código 
do padrão da língua. Se o valor do atra- 
so não for 15, a instrução jr nz,st leva 
o processador para st, pulando a instru- 
ção Id b,255. Caso contrário, a língua 
deve ser apagada para que não apareça 
nos próximos oito ciclos; o desvio não 
ocorre e 255, o código do padrão de céu, 
é colocado em B. 

Neste ponto do programa, o valor do 
atraso da cobra será sempre superior a 
7. O processador encontra a instrução 
Id a,b, que transfere o código do padrão 
apropriado de B para A. A rotina 77 da 
ROM, que coloca o código que está em 
A na posição da TN apontada por HL, 
é chamada. Com isso, imprimimos a lín- 
gua — ou apagamos a que existia — pa- 
ra fora da boca da cobra. A seguir, 
processador retorna ao laço principal do 
Jogo. 
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Todos os computadores trabalham e 
entendem apenas uma linguagem: o có- 
digo de máquina, que é representado in- 
ternamente por pequenas variações bi- 
nárias de voltagem. Ele pode ser expres- 
so por um conjunto de letras e núme- 
ros, o que facilita sua compreensão, ou 
por números binários, menos familiares 
ao usuário. De uma forma ou de outra, 
essa linguagem é considerada pouco 





acessível por muitas pessoas. O que tor- 
na mais simples a comunicação com o 
operador é o Sistema Operacional do 
computador (SO), um conjunto de ro- 
tinas em código de máquina que contro- 
lam todas as funções da máquina. Seja 
qual for a linguagem empregada, BA- 
SIC ou outra qualquer, essas rotinas se- 
rão sempre utilizadas para controlar as 
diversas funções do computador. 








Sem o sistema operacional, seria 

difícil trabalhar com o computador. 
Veja de que modo funciona esse 
importante componente do seu micro € 
aprenda a fazer dele um aliado. 


Conhecer o funcionamento do SO 
não é essencial para o usuário, porém 
amplia bastante suas alternativas de pro- 
gramação. O uso de funções internas do 
SO possibilita a obtenção de melhores 
resultados não só quanto à velocidade, 
mas, também, quanto à qualidade ge- 
ral do programa. 

Dentro dos limites impostos por ca- 
da máquina, este artigo procura mostrar 
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algumas aplicações úteis para as rotinas 
e variáveis próprias de cada sistema ope- 
racional. 





O QUE É SISTEMA OPERACIONAL | 


O SO é apenas um tipo sofisticado de 
programa — escrito em código de má- 
quina — que permite ao microproces- 
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sador existente dentro da máquina res- 
ponder aos comandos básicos de opera- 
ção. Ele controla a comunicação da má- 
quina com o mundo exterior — o tecla- 
do, a tela, o alto-falante e outras por- 
tas de entrada e saída. 

O SO tem ainda a função de assegu- 
rar que a memória seja utilizada de for- 
ma eficiente pelo usuário e pelo inter- 
pretador BASIC. Assim, quando liga- 
mos o computador, ele ativa várias de 
suas rotinas da ROM para acertar os va- 
lores iniciais de variáveis e apontadores 
e, em seguida, avisa que está pronto a 
aceitar comandos, 

Em todos os microcomputadores 
abordados em INPUT, o SO é respon- 
sável pela interpretação dos comandos 
em BASIC, contudo ele pode também 
lidar com outros tipos de linguagem. 

Na maior parte do tempo, o traba- 
lho do SO consiste em verificar e modi- 
ficar os valores de determinadas variá- 
veis e apontadores especiais. E impor- 
tante, por exemplo, que o SO conheça 
o endereço exato tanto do início como 
do fim de um programa em BASIC, Se 
o programa for modificado, seu tama- 
nho também mudará, e esses valores 
precisarão ser atualizados. 

O mesmo se aplica ao processo de 
alocação e manutenção de espaço para 
as variáveis, particularmente as variáveis 
indexadas, ou matrizes. Quando dimen- 
sionamos uma variável desse tipo, um 
espaço deve ser reservado — e, quando 
a variável não for mais necessária, ele 
deve ser eliminado. 

É essencial que o SO utilize racional- 
mente a memória, pois, caso contrário, 
um programa longo ou algumas variá- 
veis mais compridas logo esgotarão a 
quantidade de espaço disponível. Essa 
administração da memória é chamada 
de housekeeping — que poderíamos tra- 
duzir livremente por “cuidar da casa”. 
Uma boa “economia doméstica”” é in- 
dispensável para que o computador fun- 
cione eficientemente. 

O SO contém ainda uma série de ro- 
tinas de software montadas de modo 
que tanto o usuário quanto o próprio 
SO possam utilizá-las com facilidade. A 
maioria delas não é de interesse para o 
programador em BASIC, pois vários co- 
mandos dessa linguagem se encarregam 
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da execução das mesmas tarefas, cha- 
mando as rotinas apropriadas. Um bom 
exemplo é o comando INPUT, que usa 
uma série de sub-rotinas do SO, tais co- 
mo seleção e leitura da porta de entra- 
da, varredura do teclado, uso e transfe- 
rência de buffer etc. 

Outro exemplo interessante é 
CLEAR. Esse comando força o SO a 
executar todas as rotinas necessárias à 
liberação da memória RAM disponível 
para o usuário, destruindo todas as va- 
riáveis previamente existentes. 





TRABALHO SOB ENCOMENDA 


Sempre que digitamos um comando, 
o SO seleciona e coloca em ação uma 
das rotinas de seu vasto acervo. Supo- 
nhamos que você tecle a letra A: o SO 
deverá instruir o processador a imprimir 
o caractere na tela, cabendo-lhe também 
detectar a tecla que foi pressionada. A 
forma como ele faz isso varia de com- 
putador para computador. Em certas 
máquinas, o SO '“'varre”” periodicamen- 
te o teclado para verificar se alguma te- 
cla foi pressionada. Em outras, seu fun- 
cionamento normal é interrompido sem- 
pre que se pressiona uma tecla, a qual 
é identificada, em seguida, por meio de 
uma varredura. 

Para responder adequadamente à 
pressão da tecla, o SO aciona a sub- 
rotina que manda o caractere correspon- 
dente à tela. Sua execução, assim como 
a de outras rotinas em código de máqui- 
na, é muito rápida. Se pressionarmos a 
tecla <ENTER> ou a tecla <RE- 
TURN>, o SO ativará uma rotina que 
promove a mudança de linha na tela 
(new line). 





O INTERPRETADOR BASIC 


Quando executamos um programa 
codificado em uma linguagem como o 
BASIC, as instruções que estão na me- 
mória são interpretadas, ou seja, tradu- 
zidas para os códigos que o computador 
pode entender. Esses códigos modificam 
os registradores de modo que as rotinas 
do SO possam ser chamadas adequada- 
mente. Assim, as mesmas rotinas que 
possibilitam a execução de comandos 















entrados pelo teclado permitem ao SO 
a execução de um programa BASIC. 

Mas por que o BASIC é tão lento, já 
que utiliza rotinas em código, que são 
rápidas? Acontece que a linguagem de- 
ve ser interpretada a partir de palavras- 
chave — como PRINT — e de outros 
simbolos, antes que essas rotinas inter- 
nas possam ser executadas. Como a tra- 
dução do BASIC é demorada, progra- 
mas que exigem rapidez, como os de vi- 
deogame, por exemplo, são escritos di- 
retamente em linguagem de máquina. 

O tempo que se leva para escrever um 
programa em código de máquina é, em 
média, dez vezes maior do que o gasto 
em um programa BASIC. A velocidade 
de execução do mesmo, contudo, che- 
ga a ser cinquenta vezes maior, Assim, 
a não ser que a rapidez de execução se- 
ja muito importante, a maioria das pes- 
soas prefere utilizar o BASIC, dada a fa- 
cilidade de programação. 





ACESSO DIRETO AO SO 


A possibilidade de ter acesso direto 
ao SO, sem passar pelo interpretador, 
seria a solução ideal para quem prefere 
as facilidades do BASIC, mas, por ou- 
tro lado, não quer abrir mão da veloci- 
dade. Nem todas as máquinas, porém, 
oferecem essa alternativa. 

No TRS-80 e no TRS-Color, por 
exemplo, o SO faz parte do interpreta- 
dor de dezesseis Kbytes — o Microsoft 
BASIC. No MSX, além de um conjun- 
to de rotinas básicas, chamado BIOS 
(BASIC Input/Output System), o SO in- 
clui também o interpretador. Os micros 
da linha Sinclair, como o ZX-81 e o Spec- 
trum, são ainda mais restritivos, uma 
vez que não permitem acesso aos regis- 
tradores internos diretamente do BASIC 
(o que é essencial para que se possa se- 
lecionar as rotinas existentes no SO). 

Seja qual for o microcomputador e 
o tipo de acesso que oferece ao SO, sem- 
pre é possível contornar diversos proble- 
mas — inclusive a diminuição do tama- 
nho das rotinas em código — por meio 
de alguns truques. 


VARIÁVEIS DO SISTEMA 








Os usuários do Spectrum podem uti- 
lizar as rotinas do SO através do coman- 
do USR, que também serve para execu- 
- tar rotinas em código de máquina colo- 
cadas temporariamente na RAM, Ten- 
te usar, por exemplo, o comando dire- 
to RANDOM USR 0: ele provoca um 
reset geral na máquina (reinicialização). 


Para programas em BASIC, há a alter- 
nativa de se modificar determinadas va- 
riáveis por meio de comandos POKE. 

POKE 23561, seguido de um núme- 
ro entre 1 e 255, altera o lapso de tem- 
po que antecede a ativação da auto- 
repetição das teclas. O valor normal é 
dado por um POKE 23561,35. De mo- 
do análogo, POKE 23562,5, que define 
o valor normal do período que decorre 
entre duas auto-repetições sucessivas, 
também pode ser modificado. Tal recur- 
so é útil em jogos, ou qualquer outro ti- 
po de programa que exija respostas rá- 
pidas do usuário, via teclado. 

As posições 23606 e 23607 contém o 
endereço dos padrões de pontos dos ca- 
racteres. Se usarmos POKE 23606,8 
(byte menos significativo), o apontador 
será movido um caractere para cima, na 
tabela. Assim, qualquer letra que digi- 
tarmos aparecerá na tela como o carac- 
tere seguinte do código ASCII. Tente di- 
gitar esse POKE seguido de 1, 2, 3, 4. 
Note que este é um método simples de 
““criptografar”” listagens em BASIC, de- 
sencorajando curiosos que tentem lê-las. 
Se, em vez do byte menos significativo 
você recorrer ao mais significativo — 
POKE 23607,0 —, o apontador será di- 
rigido para o começo da memória 
ROM, tornando os caracteres absoluta- 
mente ininteligíveis. 

A posição de memória 23658 possi- 
bilita alterar o estado da tecla < CAPS 
LOCK > durante a execução de um pro- 
grama. POKE 23658,0 muda os carac- 
teres de maiúsculos para minúsculos; 
POKE 23658,8 admite só maiúsculos. 

O comando PLOT permite especifi- 
car uma posição absoluta da tela, en- 
quanto DRAW se refere de forma rela- 
tiva à posição corrente do cursor gráfi- 
co. Se você precisar de um DRAW ab- 
soluto, poderá consegui-lo através das 
posições de memória 23677 e 23678. Pa- 
ra verificar seu efeito, digite PLOT 
128,85. Esse comando colocará um pon- 
to no centro da tela. Suponhamos que 
você queira traçar uma linha que vá des- 
te ponto até o canto superior direito da 
tela, cuja posição absoluta é (255,175). 
DRAW 255,175 indicaria um ponto fo- 
ra da tela, mas DRAW 255-PEEK 
23677,175-PEEK 23678 lhe dará o resul- 
tado desejado. Ao subtrair PEEK 23677 
da coordenada X e PEEK 23678 da 
coordenada Y, estamos, na verdade, 
efetuando uma operação para obter as 
coordenadas relativas do comando 
DRAW. 

Um outro exemplo de utilização das 
rotinas do SO por meio de um coman- 
do BASIC é dado pela simulação de um 
relógio. No Spectrum, o contador de li- 
nhas de video ocupa as posições 23672, 
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23673, 23674. Se colocarmos O nelas, 
usando o comando POKE, o contador 
será zerado. Depois disso, sua atualiza- 
ção será feita automaticamente através 
de interrupções. Aqui está um progra- 
ma simples que emprega o contador pa- 
ra improvisar um relógio: 


10 POKE 23674,0: POKE 23673,0 
: POKE 23672,0 

20 BORDER O: PAPER O: 
CLS 

30 DEF FN t()=INT ((65536* 
PEEK 23674+256*PEEK 236/3+ 
PEEK 23672)/50) 

40 LET t=FN t() 

50 LET h=INT (t/(60*60)) 

60 LET m=INT (t/60) 

70 LET s=t-((h*60)*60)- (m*60) 
BO LET tS$="["+STARS h+":"+STAS 
m+":;:"+STA$S s+"]" 

90 PRINT AT 1,15-((LEN t3)/2) 
ço às é ads 
100 GOTO 100 


INK 6: 


A linha 10 zera o contador de linhas 
de vídeo, enquanto a linha 30 define a 
função t, que o lê. A linha 40 armazena 
o valor encontrado em t. A partir desse 
valor, as horas, minutos e segundos são 
calculados. 
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Os microcomputadores pertencentes 
à linha MSX possuem cerca de 32 
Kbytes de memória ROM dedicados ao 
SO. Os primeiros 16385 bytes são preen- 
chidos com rotinas de entrada e saida. 
O interpretador BASIC começa em 
16385 e termina em 32769. Existem ain- 
da 3202 bytes dedicados às variáveis do 
sistema, todos eles situados no topo da 
memória — 62333 a 65535. 

Um SO com essa extensão possui 
quase todas as rotinas que o usuário po- 
de desejar. Muitas dessas rotinas têm si- 
do aproveitadas no videogame Avalan- 
che. Contudo, como a maioria delas em- 
prega valores armazenados em registra- 
dores internos do Z-80 — o micropro- 
cessador do MSX —, poucas podem ser 
utilizadas diretamente por programas 
em BASIC. A solução consiste em es- 
crever pequenas rotinas em código que 
modificam os valores dos registradores, 
de modo que o BASIC possa chamar a 
rotina desejada do SO. Um exemplo 
desse procedimento foi dado no artigo 
publicado à página 114] de INPUT. 

De fato, é uma pena que o BASIC 
não possa modificar os registradores di- 
retamente, sobretudo porque o SO do 
MSX dispõe de certos artifícios proje- 
tados para facilitar a utilização de suas 
rotinas pelo usuário. Algumas porções 





da ROM e da RAM são preenchidas 
com vetores que apontam para determi- 
nadas rotinas do SO, numa tentativa de 
simplificar seu uso. 

As rotinas de entrada e saída — co- 
municação com a tela, com o gerador 
de som, com o teclado e o cassete, en- 
tre outros periféricos — estão espalha- 
das pelos primeiros 16K da ROM. Exis- 
te, porém, uma pequena região — que 
vai do endereço 59 ao 348 — que con- 
tém vetores que apontam para as prin- 
cipais rotinas do BIOS. Assim, podemos 
ter acesso a essas rotinas de duas manei- 
ras: chamando seu endereço verdadei- 
ro na memória ROM ou usando seu ve- 
tor na tabela. As rotinas do interpreta- 
dor BASIC também são apontadas por 
vetores de uma tabela localizada no to- 
po da memória — 64922 a 65535. 

As rotinas mais interessantes neces- 
sitam de parâmetros colocados nos re- 
gistradores internos. Como muitas de- 
las já foram apresentadas em outros ar- 
tigos publicados em INPUT, faremos 
uma pequena lista de rotinas (endereços 
da tabela de vetores) e endereços de va- 
riáveis úteis. 

As rotinas podem ser usadas por 
meio dos comandos DEFUSR e USR(), 
e as variáveis, por meio de PEEK e 
POKE. 
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Eis algumas rotinas de interesse na 
utilização da tela: 


65 - Desabilita a geração de ima- 
gens na tela. Pode ser util 
quando se pretende que o 
usuário não acompanhe a ela- 
boração de um desenho com- 
plicado, vendo-o só depois de 
completo. 

68 - Reabilita a geração de ima- 
gens. Faz com que o processo 
de desenho, que a rotina an- 
terior oculta, apareça instan- 
taneamente na tela. 

98 - Muda as cores da tela de acor- 
do com o valor das variáveis 
do sistema. 

108 - Equivale a SCREEN 0. Os en- 
dereços das tabelas e as cores 
podem ser modificados atra- 
vés das variáveis do sistema. 

111 - SCREEN 1. 

114 - SCREEN 2. 

117 - SCREEN 3. 

192 - Emite um sinal sonoro, 

195 - CLS. 

207 - Mostra as teclas de função na 
parte inferior da tela. 

204 - a da as teclas de função da 
tela. 


São variáveis de especial interesse pa- 
ra a tela: 


62387 a 62426 - Cada par de bytes 
corresponde ao endereço de 
uma BASE. Por exemplo, 
62407 e 62408 contêm o ende- 
reço de BASE(10), tabela de 
nomes da tela gráfica. 

62431 a 62438 - Conteúdo dos regis- 
tradores do VDP (Video Dis- 
play Processor). 

62441 - Cor de frente. 

62442 - Cor de fundo. 

62443 - Cor da borda. | 

64695 e 64696 - Coordenada X. 

64697 e 64698 - Coordenada Y. 


TECLADO E CASSETE 





Apresentamos a seguir algumas roti- 
nas de comunicação com o teclado e o 
gravador cassete. A maioria dessas ro- 
tinas precisa de determinados parâme- 
tros nos registradores. 

159 - Aguarda que uma tecla seja 
pressionada pelo usuário e de- 
volve seu código ASCII ao re- 
gistrador A. Essa rotina pode 
substituir a linha em BASIC 
que geralmente aparece depois 
que a mensagem “APERTE 
QUALQUER TECLA” é im- 
pressa: 


100 IF INKEYS$=" " THEN 100 


225 - Lê o cabeçalho de uma grava- 
ção em fita cassete. 

228 - Lê um byte da fita. O registra- 
dor A guardará o byte lido. 

231 - Encerra a leitura da fita. 

234 - Grava um cabeçalho na fita. 
Se A=0, o cabeçalho será 
curto; se A=1, será longo. 

237 - Grava um byte na fita. O re- 
gistrador A deverá conter o 
byte a ser gravado. 

240 - Encerra a gravação. 
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Muitos endereços e rotinas útéis dos 
microcomputadores das linhas Apple e 
TK-2000 foram apresentados no ar- 
tigo da página 261. Não voltaremos a 
tratar deles, nem de alguns truques já 
mencionados, como, por exemplo, o uso 
de CALL -151 para ativar o monitor. 

O SO do Apple e do TK-2000 divide- 
se em sistema monitor e rotina de ini- 
cialização (Autostart ROM). As rotinas 
citadas aqui são do monitor. 

O SO do Apple e do TK-2000 — co- 
mo o de todos os computadores que uti- 
lizam o microprocessador 6502 — tem 





suas variáveis armazenadas nos primei- 
ros 256 bytes da ROM (página 0). Esses 
micros não permitem a modificação di- 
reta dos registradores do microproces- 
sador 6502 através do BASIC. Assim, 
as rotinas que requerem parâmetros de- 
vem ser usadas com pequenas rotinas em 
código para leitura e/ou modificação 
desses registradores. 

O comando CALL serve para cha- 
mar não só essas rotinas mas, também, 
as que são montadas em código, na 
RAM. Os endereços podem ser modifi- 


cados com POKE e lidos com PEEK. 





ROTINAS DO MONITOR 


-528 - Imprime na tela o caractere 
cujo código está no acumula- 
dor (registrador A). 

-384 - INVERSE. 

-380 - NORMAL. 

-198 - Emite um sinal sonoro. No 
Apple tente também -1059, 

-741 - Imprime um cursor piscante 
e aguarda que se pressione 
uma tecla, colocando então 
seu código no acumulador. 
Também embaralha o gera- 
dor de núfneros aleatórios. 

-864 - Provoca um atraso de acor- 
do com o valor do acumu- 
lador A. No Apple II a du- 
ração do atraso é de (26 + 
27*A+S*A*A)/2 microsse- 
gundos. No TK-2000 a demo- 
ra é maior. 

-1948 - Determina qual será a cor do 
gráfico de baixa resolução de 
acordo com o conteudo do 
acumulador. 

-1953 - Adiciona o valor 3 ao código 
da cor atual para gráficos de 
baixa resolução. 

-2048 - Desenha um ponto de baixa 
resolução. O acumulador de- 
fine a coordenada vertical, e 
o registro Y determina a 
coordenada horizontal. 

-2023 - Desenha uma linha horizon- 
tal em baixa resolução — 
coordenada vertical em A, 
coordenada horizontal inicial 
em Y e coordenada horizon- 
tal final no endereço $2C. 

-2008 - Desenha uma linha vertical 
em baixa resolução — coor- 
denada horizontal em Y, 
coordenada vertical inicial 
em A e coordenada vertical 
final no endereço 82D. 

-1998 - Apaga a tela de baixa resolu- 
ção. No micro Apple, preen- 
che a tela com caracteres O 
invertidos, se for chamada no 
modo texto. | 
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-1994 - Igual à anterior, só que res- rotinas em código montadas na RAM. tinas principais, a saber: BLKIN — no 
peita as quatro linhas de tex- Muitas variáveis são obtidas com endereço 42763 —, que faz a leitura de 
to no rodapé da tela. PEEK. um bloco de 255 bytes na fita; e 








-1935 - Verifica a cor de uma posição Ena : É BLKOUT — endereço 42996 —, que 
da tela de baixa resolução, COMUNICAÇÃO COM O CASSETE grava um bloco na fita. 
usando os mesmos registros pl Também são de utilidade para o pro- 


que a rotina do endereço Todas as rotinas destinadas ao uso gramador BASIC os endereços da pá- 
-2048. A cor do ponto retor- em gravador cassete empregam duas ro- gina |, que listamos a seguir: 
nará no acumulador. . ss id <a | 
-182 - Grava todos os registros do ao 
microprocessador 6502. Usa 
os endereços 845 a $49. 
-193 - Recupera os registros. Usa os 
endereços $45 a $49. 


TELA DE ALTA RESOLUÇÃO 


Os endereços que controlam o tipo de 
tela no Apple foram muito usados nos 
programas de INPUT e não serão repe- 
tidos. Existem, contudo, alguns outros 
endereços interessantes para gráficos de 
alta resolução. 





224/225 - Coordenada X do último 
ponto plotado. 

226 - Coordenada Y do último pon- 
to plotado. 

230 - Indica a página em que o pon- 
to deve ser plotado. O valor 
32 corresponde à página 1, e 
64, à página 2. Note que o 
acesso a esse endereço permi- 
te que se desenhe na página 2, 
enquanto se mostra a página 
l e vice-versa. 

228 - Indica a cor do gráfico. Seus 
valores estão na tabela apre- 
sentada a seguir. 





HCOLOR COR BYTE 228 
preto 1 ê aii 
verde 42 a: 
violeta 85 
branco 1 127 a 
preto 2 128 n 
vermelho 170 aaa e 
azul 213 a de E a 
branco 2 255 ia 
-— Pee na o JS 
62450 - Limpa a tela (alta resolução). ame ES | 
a e 


62454 - Preenche a tela de alta reso- à é 
lução com o byte 228. Além ERA h | one 
de permitir a seleção de co- B k > ? - 
res de fundo para seus dese- o 
nhos, essa rotina produz di- 
versos padrões quando o > 
byte 228 assume valores que o o. | dis 
não correspondem às cores 1o nr Rs 
da tabela anterior. 1IA | 


As rotinas do SO são acessadas pelo 
E comando EXEC, que também chama 











121 - Fornece o status da porta de 


entrada e saída do gravador 
cassete. Pode assumir os valo- 
res O (porta fechada), 1 (aber- 
ta para entrada) e 2 (aberta pa- 
ra saida). Para evitar que er- 
ros de saída destruam seu pro- 
grama, verifique a porta utili- 








zando o comando PEEK an- 
tes de abrir um arquivo. 

144 - Empregado pelo sistema ope- 
racional para definir o compri- 
mento do cabeçalho. Se você 
tem problemas com o volume 
do gravador, coloque um va- 
lor mais alto nesta posição 


por meio do comando POKE. 


149/150 - Estas posições contêm o 
lapso de tempo que se segue a 
um comando MOTOR ON. 
POKE 149,0:POKE 150,1 re- 
sultará em lapso zero, útil 
ao se usar AUDIO ON/OFF 
com controle do motor. 





PROCESSAMENTO DE TEXTOS 


Outra seção do sistema operacional 
que pode ser de interesse para o progra- 
mador BASIC é aquela que executa os 
testes de entrada e saída. Ela inclui en- 
trada do teclado e saída para a tela e a 
impressora. 

Frequentemente, a mensagem “aper- 
te qualquer tecla” surge na tela junto 
com um laço do tipo: 


100 IF INKEY3=" " THEN 100 


Essa linha pode ser substituída por 
outra bem mais curta: EXEC 44539. Se 
você quiser um cursor piscante use 
EXEC 36038. 

Convém anotar ainda os seguintes 
endereços dessa seção: 

135 - Contém o código ASCII da 
última tecla pressionada. 
338 e 345 - Colocando o valor 255 
nessas posições, antes do IN- 
KEY$, obtém-se a auto-repe- 
tição das teclas. 

282 - É a trava de letras maiúsculas. 
Você pode forçar as minúscu- 
las colocando um O ali. O va- 
lor 255 força as maiúsculas e 
qualquer outro valor desabi- 
lita o uso de <SHIFT>0. 

43304 - Contém a rotina que limpa 
a tela. 





| COMUNICAÇÃO COM A IMPRESSORA 


Entre as variáveis relacionadas à im- 
pressora, são de maior utilidade para o 
programador aquelas que se encontram 
nos seguintes endereços: 


153 - Determina a distância entre 
itens separados por virgulas. 
O normal é 16. 

155 - Para que a função POS(-— 2) 
tenha um desempenho satisfa- 
tório, esse endereço deve con- 


ter a largura do papel utiliza- 
do (40, 80 ou 132). 

330 - Contém o número de caracte- 
res enviados pelo computador 
para assinalar um final de li- 
nha (EOL). Normalmente, 
apenas um caractere é 
enviado. 

331 a 334 - Contêm os caracteres do 
EOL: CR (13), LF (10), 0, 0. 
Esses caracteres podem ser al- 
terados para corresponder a 
um certo tipo de impressora. 

328 - Contém o indicador de ali- 
mentação automática de li- 
nha. Se seu valor for 0, o 
computador faz o papel avan- 
çar automaticamente com o 
retorno do carro. Qualquer 
outro valor leva à impressão 
dos caracteres do EOL após a 
do número de caracteres indi- 
cados por 155. 


GRÁFICOS 


O programador BASIC não tem 
acesso às rotinas do SO que dizem res- 
peito aos gráficos. Mas existem alguns 
endereços que, junto com os comandos 
PEEK e POKE, podem ser úteis. 


182 - PMODE: número do modo gráfico. 
183/184 - Endereço final da tela. 
186/187 - Endereço inicial da tela. 

188 - Início da página 1. 

200 - Coordenada X do cursor gráfico. 
202 « Coordenada Y do cursor gráfico. 


OUTRAS ROTINAS INTERESSANTES 





EXEC 43486 - Atualiza todos os joys- 
ticks; soluciona os problemas que 
sao ocorrer com o comando 

EXEC 40999 - Equivale ao botão RESET. 

EXEC 41142 - Reinicialização total: 
equivale a desligar e ligar a máqui- 
na novamente. 

EXEC 46481 - Executa uma “coleta de 
lixo" controlada nas variáveis al- 
fanuméricas, evitando as desagra- 
dáveis pausas que ocorrem inespe- 
radamente nos programas que as 
incluem. A quantidade de espaço 
string remanescente pode ser cal- 
culada com 


PEEK (35) *256+PEEK (36) -PEEK (33)A 
256-PEEK (34) 


O valor normal para o espaço 
string é 200. A não observância 
desse limite pode causar erros do 
tipo OS (out of string, que quer di- 
zer: fim do espaço para string). 











Qualquer programa que manipule 
grande quantidade de informação deve 
armazená-la da maneira apropriada. No 
artigo publicado à página 128, tratamos 
do armazenamento de uma pequena lis- 
ta de telefones em linhas DATA. O pro- 
grama ali apresentado permite ao usuá- 
rio procurar e imprimir qualquer item 
da lista. Porém, para qualquer modifi- 
cação na lista, é necessário interromper 
a execução do programa e editar as li- 
nhas DATA. Além disso, os dados só 
podem ser gravados junto com o pro- 
grama que os manipula. 

Essa dependência dos dados ao pro- 
grama muitas vezes é indesejável. Para 
evitá-la, convém guardar os dados em 
fita cassete ou disco flexivel. A retupe- 
ração das informações é tão rápida 
quanto no caso das linhas DATA, mas 
a alteração e a edição de dados tornam- 
se extremamente mais fáceis. Para 
efetuá-las, o usuário não precisa saber 
nada a respeito do programa. 

'* Como em muitos programas aplica- 
tivos listados em INPUT, os dados são 
armazenados em arquivos, na fita ou 
disquete. O banco de dados, o orçamen- 
to doméstico, a agenda eletrônica e a 
planilha são exemplos de programas que 
envolvem grande quantidade de infor- 
mações. Se observarmos suas listagens 
com atenção, poderemos identificar as 
linhas que tratam da gravação e leitura 
dos dados. Elas ocupam uma porção 
mínima do programa, se comparadas às 
demais seções, encarregadas, entre ou- 
tras coisas, de reservar espaço na memó- 
ria, estabelecer a comunicação com o 
usuário e manipular os dados. 

Quando armazenamos os dados à 
parte, as possibilidades de utilização do 
programa aumentam bastante, esten- 
dendo-se à criação e alteração de vários 
arquivos diferentes, com quantidades 
diversas de registros e campos. 

Empregamos em nosso programa o 
método de armazenagem sequencial, cu- 
jo princípio é muito simples. Como vo- 
cê verá, ele permite que os dados sejam 
convertidos a um formato que se adap- 
ta a diversos programas, e até mesmo a 
computadores diferentes. 

O arquivo sequencial caracteriza-se 
pela armazenagem dos dados em série, 


Es dispostos um após o outro e separados 





COMO LIDA 
COM ARQUIVOS 





apenas por um byte. Toda a informa- 
ção deve estar na memória antes de ser 


transferida ao arquivo. 


O primeiro passo para a criação de 
um arquivo sequencial consiste na aber- 
tura de um canal de comunicação com 
o dispositivo que vai armazenar os da- 
dos — cassete ou drive. Isso é feito por 
intermédio do comando OPEN, numa 
sintaxe que varia conforme o tipo do mi- 
crocomputador. Para conhecer os co- 
mandos mais utilizados, volte ao artigo 
da página 688. 

Aqui, explicamos em detalhe as téc- 
nicas envolvidas na criação de arquivos, 
de modo que você poderá incorporá-las 
facilmente a seus programas. 


CRIANDO UM ARQUIVO 


O programa a seguir mostra como 
criar uma versão mais sofisticada da lis- 
ta de telefones mencionada anterior- 
mente. Ao utilizá-la, você poderá mo- 
dificar, sem maiores dificuldades, as 
mensagens dos comandos INPUT e o 
formato das matrizes, para que aceitem 
outro tipo de informação. 

Os dados são fornecidos nesta or- 
dem: nome, sobrenome e número do te- 
lefone. Como números de telefone po- 
dem conter espaços, hífens e parênteses, 
convém dar-lhes a forma de cadeia de 
caracteres. Se você quiser alterar o pro- 
grama para lidar com outros tipos de in- 
formação, poderá usar também matri- 
zes numéricas e alfanuméricas. Um ar- 
quivo recebe dados em qualquer forma- 
to e em qualquer ordem. O importante 
é que a leitura se faça nessa mesma or- 
dem e que os dados sejam colocados no 
tipo adequado de variável. 

Embora seja possível armazenar in- 
formações diretamente no arquivo, é 
mais conveniente que coloquemos os da- 
dos em uma matriz e depois guardemos 
toda a matriz no arquivo. 

A primeira parte do programa tem 
um pequeno laço que possibilita a en- 
trada dos dados. Digite quantos nomes 
€ números quiser — o limite é a dimen- 
são da matriz, especificada na linha 10. 
Modifique a dimensão, caso precise de 
um número de itens superior a cinguen- 
ta. Quando tiver entrado todos os da- 





Abra um canal de comunicação com o 
drive ou o cassete e mande seus 
valiosos dados para o arquivo. Saber 
manipular essa ferramenta é 
fundamental para certas aplicações. 


dos, digite ENTER ou RETURN e o la- 
ço de entrada será interrompido. 

A segunda parte do programa — da 
linha 100 em diante — grava os dados 
no arquivo. Daremos explicações refe- 
rentes a seu funcionamento nas várias 
versões do programa. 

10 DIM AS(50,15): DIM BS(50, 
15): DIM T3(50,12): DIM N(1) 
20 LET N=0 

30 LET N=N+1 

40 INPUT "PRIMEIRO NOME ";AS( 
N) 
50 
) 
60 INPUT 
"1 TS (N) 
70 IF AS(N)<>" 

” AND N<50 THEN GOTO 30 

BO CLS PRINT "SALVANDO DADO 
S AGORA” 
100 SAVE 
110 SAVE 


INPUT "SEGUNDO NOME ";BS(N 


"NUMERO DO TELEFONE 


"CONT" DATA N() 
"P.NOMES” DATA AS() 
120 SAVE "S.NOMES" DATA BS() 
130 SAVE "N.TELEF.”" DATA TS() 
140 PRINT "DADOS GRAVADOS” 
150 STOP 

Para a gravação, o Spectrum utiliza 
o comando SAVE seguido do nome do 
arquivo. Note que cada matriz é grava- 
da como um arquivo distinto, receben- 
do um nome especial. A instrução DA- 
TA seguida do nome da matriz deve vir 
depois do nome do arquivo. 


10 DIM AS(50),B$(50), TS(50) 

30 N=N+1 

40 INPUT “PRIMEIRO NOME” ;AS(N) 
50 INPUT "SEGUNDO NOME” ;B3(N) 
60 INPUT "TELEFONE" ;TS (N) 

70 IF AS(N)<>"" AND N<50 THEN 3 
0 
80 CLS:PRINT “GRAVANDO OS DADOS 
100 OPEN “CAS:ARQ” FOR OUTPUT A 
8 +1 
110 
120 
130 
140 
150 


PRINT 41,N 
FOR L=1 TON 
PRINT 41,AS(L), BS(L), TS(L) 
NEXT 
CLOSE 41 
160 PRINT "DADOS GRAVADOS” 
170 END 
Os dados entrados na primeira parte 
do programa são colocados em três va- 
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Como gravar dados em fita cassete 
no Apple e no TK-2000? 

Para contornar os problemas de ar- 
quivamento no Apple e no TK-2000, a 
melhor solução é comprar um drive de 
discos flexíveis. Mas existem algumas 
alternativas — nenhuma milagrosa, po- 
demos adiantar. 

Esses micros só permitem a grava- 
ção de uma variável indexada unidi- | 
mensional e não montam na fita um ar- 
quivo propriamente dito. O leitor pode 
achar que isso já é suficiente para al- 
gumas aplicações. Porém, a lentidão e 
o grande espaço que uma pequena va- 
riável ocupa na fita certamente logo 
vão desencorajar os mais afoitos. 

Em nossa opinião, a saída mais con- 
veniente para quem não pode adquirir 

um drive é colocar os dados em um 
buffer no alto da memória, usando o 
comando POKE. Em seguida, basta en- 
trar no monitor de linguagem de máqui- 
na — com CALL -151 — e gravar o buf- 
fer por intermédio do comando W do 
monitor. 


riáveis indexadas: AS( ), B$( )e TH ). 
Na linha 100, abrimos um arquivo para 
a gravação de dados em fita cassete por 
intermédio da instrução OPEN “CAS: 
nome do arquivo” FOR OUTPUT As 
* número do arquivo. 

A instrução PRINT 1 significa 
“imprima o próximo item no arquivo”. 
Assim, a linha 110 grava o valor de N 
— total de números e nomes da lista —, 
para que seja usado posteriormente na 
leitura do arquivo. 

O laço entre as linhas 120 e 140 utili- 
za a mesma instrução PRINT 1 para 
guardar o conteúdo das três variáveis in- 
dexadas. A instrução CLOSE *1, por 
sua vez, fecha o arquivo. 


10 DIM A$S(50),B3(50),TS(50) 


20 DS = cCHR$ (4) 
30 N=N+1 


40 INPUT "PRIMEIRO NOME ";AS(N 
) 

50 INPUT "SEGUNDO NOME ";BS(N) 
60 INPUT "TELEFONE ";TS(N) 


> *"” AND N< 50 


70 IF AS(N) < 


140 


THEN 30 

80 HOME : PRINT "GRAVANDO OS D 
ADOS” 

100 PRINT D$;"OPEN ARQUIVO” 
110 PRINT DS;"WRITE ARQUIVO” 
120 PRINT N 

130 FORL =1 TON 

140 PRINT AS(L): PRINT BS(L): 


PRINT TS(L) 


150 NEXT L 

160 PRINT D$;"CLOSE ARQUIVO" 
170 PRINT "DADOS GRAVADOS” 
180 END 


Trataremos apenas da gravação em 
disquete, pois a armazenagem de arqui- 
vos em fita no Apple e no TK-2000 é 
muito precária. Como você deve se lem- 
brar, para controlar o drive sem sair do 
BASIC Applesoft utilizamos o caracte- 
re de controle CHR$(4), que foi colo- 
cado na variável D$ (linha 5). 

A primeira parte do programa, que 
cuida da entrada dos dados, coloca-os 
em três variáveis indexadas: AS( ), 
B$( ) e T$( ). Um arquivo é aberto na 
linha 100 através do caractere de con- 
trole, seguido do comando OPEN e do 
nome do arquivo (entre aspas). 

O comando WRITE, na linha 110, 
permite a gravação de dados no arqui- 
vo que foi aberto. Todos os comandos 
PRINT que aparecem em seguida escre- 
vem no arquivo e não na tela. O coman- 
do CLOSE fecha o arquivo e devolve a 
função original ao PRINT. 


10 DIM AS(50),B$(50), T$(50) 

30 N=N+1 

40 INPUT" PRIMEIRO NOME ";AS(N) 
50 INPUT"SEGUNDO NOME ";BS(N) 
60 INPUT"NUMERO DO TELEFONE ";T 
2 (N) 

70 IF AS(N)<>"” AND N<50 THEN 3 
0 

80 CLS: PRINT"SALVANDO DADOS AGO 
RA" 


Use esta seção para arquivos em fita 
cassete: 
100 OPEN "0",4-1," ARQUIVO” 
110 PRINT 4-1,N 
120 FOR L=1 TO N 
130 PRINT f&-1,AS(L),BS(L), TS(L) 
140 NEXT 
150 CLOSE 4-1 
160 PRINT"DADOS GRAVADOS” 
170 END 


Utilize esta seção para arquivos em 
disquete: 


100 OPEN "0”",461," ARQUIVO” 

110 PRINT 41,N 

120 FOR L=1 TO N 

130 PRINT 41,AS(L),BS(L), TS(L) 
NEXT 


150 CLOSE 41 








160 PRINT"DADOS GRAVADOS” 
170 END 


A primeira seção do programa, que 
trata da entrada dos dados, é comum 
aos dois tipos de dispositivo, ao contrá- 
rio da segunda seção, incumbida de gra- 
var os dados. 

Na versão para fita cassete, um ar- 
quivo é aberto pela instrução OPEN 
“O” que estabelece uma linha de comu- 
nicação com o dispositivo de armazena- 
mento para a saída de dados. Ela é se- 
guida por um &-— 1, que diz ao compu- 
tador que se trata de gravador cassete, 
e pelo nome do arquivo entre aspas. 

O comando PRINT & —1 significa 
“imprima o próximo valor no arquivo”. 
Assim, a linha 110 grava o valor de N 
— o número de telefones da lista. Para 
o processo de leitura, que descrevemos 
a seguir, é importante que esse valor en- 
cabece o arquivo, 

A linha 130 escreve cada um dos itens 
no arquivo — observe que eles são se- 
parados por meio de vírgulas. Finalmen- 
te, o comando CLOSE & — 1 fecha o ar- 
quivo (linha 150). 

A criação de arquivos em discos fle- 
xíveis é muito semelhante, empregando 
os mesmos comandos. A única diferen- 
ça é o número utilizado após o sinal &. 
OPEN “0”, 41, seguida do nome do 
arquivo entre aspas, abre um arquivo; 
PRINT %1 guarda um item nele e CLO- 
SE &1 trata de fechá-lo. 

Como você pode notar, na linha 130 
os itens estão separados por ponto e vir- 
gula. Embora se permita o uso de vír- 
gulas, aquele é o modo mais econômi- 
co de armazenar dados no disco. 

Os disquetes admitem a criação de 
mais de um arquivo ao mesmo tempo, 
pois, ao contrário do gravador cassete, 
o drive é capaz de procurar a porção 
adequada para ali gravar os dados. As- 
sim, podemos numerar os arquivos com 
*1, 42, 43 e assim por diante, en- 
quanto o cassete é sempre numerado 
com & — 1 — um PRINT 4 — 2 manda- 
rá o dado para a impressora. 





A LEITURA DO ARQUIVO 


O programa que recupera as infor- 
mações gravadas no arquivo é exata- 
mente o inverso do programa anterior. 
Ele imprime os dados lidos na tela para 
que possamos conferi-los. 


200 CLEAR 
210 DIM N(1): 
N() 


LOAD “CONT” DATA 








215 DIM AS(N(1),15): DIM BS(N( 
1),15): DIM TS(N(1),12) 

220 LOAD "P.NOMES" DATA AS() 
230 LOAD "S.NOMES" DATA BS() 
240 LOAD "N.TELEF." DATA TS() 
250 FOR L=1 TO N(1) 

260 PRINT AS(L),BS(L), TS(L) 
270 NEXT L 


Para utilizar esse programa, rebobi- 
ne a fita até o começo do arquivo gra- 
vado pelo primeiro programa. Digite 
RUN 200 para recuperar os dados; não 
rode o programa inteiro novamente. 

A linha 200 apaga os antigos valores 
das variáveis, para que só os obtidos no 
arquivo sejam impressos. A linha 210 di- 
mensiona uma nova variável N( ) com 
um elemento. Ela será usada para recu- 
perar o valor de'N gravado anteriormen- 
te. As outras variáveis são dimensiona- 
das de acordo com o valor de N( ). Co- 
nhecendo o número exato de elementos 
do arquivo, não tentaremos ler além do 
seu final. 

O resto do programa é fácil de enten- 
der: simplesmente substituímos os SA- 
VE do primeiro programa por LOAD. 
E preciso fechar um arquivo aberto pa- 
ra gravação, mas não para leitura. 


“o MR 


200 CLEAR 2000:0PEN"CAS:ARQUIVO 
"FOR INPUT AS 41 

210 INPUT41,N:DIM AS(N),BS(N),T 
S (N) 

220 FOR L=1 TO N 

230 INPUT 41,AS(L), BS(L), TS(L) 
235 PRINT AS(L) ;BS(L);TS(L) 

240 NEXT L 

250 CLOSE 41 

Para usar esse programa, rebobine a 
fita até o começo do arquivo gravado 
pelo primeiro programa. Digite RUN 
200 para ler o arquivo; não rode o pro- 
grama inteiro novamente. 

A linha 200 apaga as variáveis origi- 
nais; dessa maneira, O programa impri- 
me só aquilo que obtiver no arquivo. Es- 
te é aberto para leitura pela instrução 
OPEN “CAS: FOR OUTPUT AS, se- 
guida do valor adequado. 

A linha 210 1ê a quantidade de nomes 
armazenada no arquivo — N — e utili- 
za esse valor para dimensionar as variá- 
veis. N também controla o laço de lei- 
tura do arquivo, para que ele seja recu- 
perádo até o final. Note que os valores 
lidos são colocados nas variáveis na or- 
dem em que foram gravados, separados 
pelo mesmo tipo de sinal — no caso da 
fita, a vírgula. O arquivo deve ser fecha- 
do após ser lido. 


o DES rar 


200 DS = CHR$S (4): PRINT D$;"0 


PEN ARQUIVO" 


210 PRINT DS;"READ ARQUIVO” 
220 INPUT N: DIM AS(N),BS(N),T 
S(N) 

230 FOR L =1TON 

240 INPUT AS(L): PRINT AS(L) 
250 INPUT BS(L): PRINT BS(L) 
260 INPUT TS(L): PRINT TS(L) 
270 NEXT L 

280 PRINT DS;"CLOSE ARQUIVO” 


A linha 200 é encarregada de apagar 
os antigos valores das variáveis; dessa 
maneira, O programa imprime somente 
os valores que obtiver no arquivo. Este 
é aberto para leitura pela instrução 
OPEN seguida de READ, 

A linha 210 lê a quantidade de nomes 
armazenada no arquivo — N — e utili- 
za esse valor para dimensionar as variá- 
veis. N também tem como função con- 
trolar o laço de leitura do arquivo, pa- 
ra que ele seja recuperado até o final. 
Note que os valores lidos são colocados 
nas variáveis na mesma ordem em que 
foram gravados, separados pelo mesmo 
tipo de sinal — no caso da fita, a virgu- 
= O arquivo deve ser fechado após ser 

ido. 


Para fita cassete, use esta seção: 


200 CLEAR 2000:0PEN"I”,4-1,"ARO 
UIvVO” 

210 INPUT4-1,N:DIM AS(N),BS(N), 
TS (N) 

220 FOR L=1 TO N 

230 INPUT +-L,AS(L) + BS (L) "TS (L) 
235 PRINT AS(L);BS(L);TS(L) 

240 NEXT L 

250 CLOSE 4-1 


No caso de discos flexíveis, recorra 
a esta outra: 


200 CLEAR 2000:0PEN "0”",41,"ARQ 
UIVO” 

210 INPUT&1L,N:DIM AS(N),BS(N).T 
S (N) 

220 FOR L=1 TON 

230 INPUT &1L,AS(L),BS(L), TS(L) 
235 PRINT AS(L);BS(L);TS(L) 

240 NEXT L 

250 CLOSE +41 


Para executar essa parte do progra- 
ma, rebobine a fita até o início do ar- 
quivo. Digite o comando RUN 200 pa- 
ra recuperar os dados; não rode o pro- 
grama inteiro novamente. 

A linha 200 apaga os antigos valores 
das variáveis; dessa maneira, O progra- 
ma imprime apenas os valores que ob- 
tiver no arquivo. Este é aberto para lei- 
tura pela instrução OPEN *“'T” seguida 
do valor adequado — & — 1 para fita e 
$1 para disquete. 





A linha 210 lê a quantidade de nomes 
armazenada no arquivo — N — e utili- 
za esse valor para dimensionar as variá- 
veis. N também controla o laço de lei- 
tura do arquivo, para que ele seja recu- 
perado até o final. Note que Os valores 
lidos são colocados nas variáveis na or- 
dem em que foram gravados, separados 
pelo mesmo tipo de sinal — no caso da 
fita, a vírgula; no do disco, ponto e vir- 
gula. O arquivo deve ser fechado após 
ser lido, 


a si, CEE CAR 


ha FIM DE ARQUIVO 







O último programa usou a variável 
N para controlar a leitura do arquivo. 
Contudo, nem sempre é possivel saber 
de antemão quantos itens devem ser li- 
dos. Um modo de contornar o proble- 
ma é usar um marcador para sinalizar 
o fim do arquivo. O TRS-Color e o 
MSX colocam automaticamente um si- 
nal desse tipo — EOF — no final, sem- 
pre que uma instrução CLOSE é en- 
contrada. 

Assim os usuários dos microcompu- 
tadores TRS-Color e MSX podem mo- 
dificar o programa anterior para que ele 
leia o arquivo desde o início, parando 
sempre que encontrar o sinal que indi- 
ca fim de arquivo — EOF. 

Listamos o programa a partir da li- 
nha 100 para que você possa compará- 
lo à versão já dada e escolher o método 
que considerar melhor. 

Modifique as linhas conforme a lis- 
tagem abaixo e, depois, tente gravar e 
ler o arquivo novamente. 


My 


100 OPEN 
TAS &1 

110 N=0 

120 N=N+1 
140 IF AS(N)<>""* AND N<50 THEN 
120 
150 
160 


“CAS: ARQUIVO"FOR OUTPU 


CLOSE 41 

PRINT "DADOS 
170 END 

200 CLEAR 2000;DIM AS(50),BS(50 
), T$(50) “OPEN "CAS:ARQUIVO” FOR 
INPUT AS 41 

TS (N) 

235 PRINT AS(N) ;BS(N); TS(N) 

240 IF EOF(1)=0 THEN 230 

250 CLOSE 41 


Apague as linhas 210 e 220 e modifi- 
que as demais. Para a fita: 


GRAVADOS” 








|| | | | 
|| || | 


100 OPEN "0”,4-1," ARQUIVO" 

110 N=0 

120 N=N+1 

130 PRINT 4-1,AS(N),BS(N),TS(N) 
140 IF AS(N)<>"" AND N<50 THEN 
120 

150 CLOSE t-1 

160 PRINT "DADOS GRAVADOS” 

170 END 

200 CLEAR 2000;DIM AS(50),BS(50 


), TS(50) :OPEN "I”,&-1," ARQUIVO” 
230 N=N+1: INPUT 4-1,AS(N),BS(N) 
+ TS (N) 

235 PRINT AS(N);BS(N);TS(N) 

240 IF EOF(-1)=0 THEN 230 

250 CLOSE 4-1 


Para o disquete: 


100 OPEN "0”",41," ARQUIVO” 

110 N=Q 

120 N=N+1 

130 PRINT 41,AS(N),BS(N),TS(N) 

140 IF AS(N)<>"” AND N<50 THEN 

120 

150 CLOSE 41 

160 PRINT "DADOS GRAVADOS” 

170 END 

200 CLEAR 2000;DIM AS(50),BS(5O0 


) TS (50) :OPEN "0”,41," ARQUIVO” 
230 N=N+1: INPUT 41,AS(N), BS(N), 
TS (N) 

235 PRINT AS(N);BS(N);TS(N) 

240 IF EOF(1)=0 THEN 230 

250 CLOSE tl 


A linha 240 de ambos os programas 
verifica a ocorrência de um sinal de fim 
de arquivo — EOF. 


OUTROS SINALIZADORES 





Para indicar o final do arquivo, os 
usuários dos microcomputadores da li- 
nha Apple podem colocar ali um sinali- 
zador arbitrário. Já no caso do Spec- 
trum, detectamos o fim do arquivo de 
outra maneira: após entrar todos os da- 
dos no laço inicial, digitamos uma se- 
nha arbitrária. Esta pode ser ZZZ, 
— 999, a palavra FIM ou qualquer ou- 
tra coisa que normalmente não se inclui 
entre os dados de um arquivo. 

Altere as próximas linhas e veja co- 
mo utilizar um sinalizador desse tipo. 
Ao digitar os dados do arquivo, entre 
a palavra FIM após o último número de 
telefone e ENTER ou RETURN após as 
outras duas solicitações. 


70 TF AS(N)<>"FIM”" AND N<50 THE 
N 30 

140 IF AS(N)<>"FIM”" AND N<50 TH 
EN 120 

240 IF AS(N)<>"FIM” AND N<50 TH 
EN 230 


40 


50 
60 
70 
50 
BO 


DS = 
N=N+1 


DIM AS(50),B$S(50), TS(50) 
CHAS (4) 
INPUT "PRIMEIRO NOME “;ASIN 
INPUT "SEGUNDO NOME ":;BS(N) 
INPUT "TELEFONE ";TS(N) 

IF AS(N) < > "FIM" AND Ns 
THEN 30 
HOME 


PRINT "GRAVANDO OS D 


ADOS” 


100 
110 
120 
130 
140 


PRINT D3;"OPEN ARQUIVO” 
N=0 
N=N+1 
PRINT DS;"WRITE ARQUIVO” 
PRINT AS(N): PRINT BS(N): 


PRINT TS (N) 


150 


IF AS(N) < > "FIM" AND N 


< 50 THEN 120 


160 
170 
180 
200 
PEN 
210 
220 
225 
230 
240 


PRINT D$;"CLOSE ARQUIVO” 
PRINT "DADOS GRAVADOS” 

END 
DS = CHR$S (4): PRINT D$S;"O 
ARQUIVO” 

PRINT D$;"READ ARQUIVO” 
DIM AS(50),BS(50), TS(50) 
L=O 

L=L+1 


INPUT AS(L): PRINT AS(L) 











250 INPUT BS(L): PRINT BS(L) 
260 INPUT TS(L): PRINT TS(L) 
270 IF AS(L) < > "EIM” AND L 
< 50 THEN GOTO 230 

280 PRINT D$S;"CLOSE ARQUIVO” 


70 IF AS(N)<>"FIM" AND N<50 THE 
N 30 

140 IF AS(N)<>"FIM” AND N<50 TH 
EN 120 

240 IF AS(N)<>"FIM” AND N<50 TH 
EN 230 


| O USO DOS DADOS | 


Armazenados em um arquivo, ou se- 
ja, fora de um programa BASIC, os da- 
dos podem ser utilizados por vários pro- 
gramas diferentes. Qualquer uma das 
rotinas de ordenação apresentadas nos 
artigos das páginas 468 e 738, por exem- 
plo, servem para ordenar alfabeticamen- 
te nossa lista telefônica. Uma vez feito 
isso, podemos localizar rapidamente de- 
terminado item da lista, por meio de 
uma busca binária, como mostra o ar- 
tigo da página 930. 





MELO SS E REA IES E E E E O RA 






Se você sentir a vista cansada após 
fixar por algum tempo o vídeo do micro, 
talvez seja a hora de providenciar 

um outro monitor. Use este programa 
para testar a qualidade da imagem. 


Até pouco tempo atrás, o preço de 
um monitor de vídeo colocava esse pe- 
riférico totalmente fora do alcance da 
maioria dos proprietários de micros, 
obrigando-os a utilizar aparelhos co- 
muns de TV como saída de vídeo. 

Os televisores apresentam vários in- 
convenientes: a imagem pisca e oscila 
continuamente de modo imperceptível, 
o que provoca dores de cabeça e cansa- 
ço visual após um certo tempo. Outro 
problema é causado pela baixa resolu- 
ção da tela, que resulta em perda de de- 
talhes e definição da imagem em textos 
e gráficos. 

Entretanto, o custo relativo dos mo- 
nitores profissionais de vídeo tem caií- 
do bastante nos últimos anos, tornan- 
do esse periférico cada vez mais acessi- 
vel. E, se você ainda não tem um, vale 
a pena ir pensando em adquiri-lo, pois 
a qualidade da imagem é bem superior 
à de um televisor. 

No artigo da página 851, descreve- 
mos as características técnicas que dife- 
renciam um televisor de um monitor e 
falamos dos aspectos que devem ser con- 
siderados na escolha de um bom moni- 
tor. Não há dúvida, porém, de que o 
melhor critério para essa seleção ainda 
é o “Teste de São Tomé” — ou seja, 
ver como fica a imagem no video, quan- 
do o conectamos ao nosso computador. 
Como há problemas de compatibilida- 
de entre monitores e micros, é funda- 
mental que você use o seu modelo na ho- 
ra desse teste. 

O programa listado neste artigo foi 
projetado para testar as características 
do video em diferentes linhas de compu- 
tadores. À versão para o Spectrum mos- 
tra um único padrão visual na tela; já 
as versões para o!MSX, Apple, TK-2000 
e TRS-Color mostram duas ou três te- 
las sucessivas, cada qual projetada pa- 
ra testar um aspecto do funcionamento 
do video. 





PROGRAMA PARA 
TESTE DO VÍDEO 








Os padrões visuais variam de compu- 
tador para computador, mas contém ba- 
sicamente os elementos utilizados em tes- 
tes como os que são transmitidos em ho- 
ras mortas pelas emissoras de TV: cir- 
culos e linhas espaçadas a curta distân- 
cia, para testar o poder de definição de 
tela; padrões colocados nos cantos da te- 
la, para testar distorções marginais da 
imagem, e barras ou faixas de todas as 
cores disponíveis. 

Ão rodar O programa de teste, obser- 
ve primeiro se a imagem está bem cen- 
trada. Em alguns computadores, o ge- 
rador de vídeo não deixa margem na te- 
la, e, se ela estiver mal ajustada, haverá 
uma perda de gráficos e textos junto à 
borda. Muitos monitores e televisores 
dispõem de botões giratórios de ajuste 
de centralização e expansão de imagem, 
localizados atrás do aparelho.'Você po- 
derá usá-los para conseguir um resulta- 
do melhor. 

Verifique em seguida se as linhas dos 
retângulos junto às bordas da imagem 
não sofrem uma grande distorção (as li- 
nhas retas se transformam em arcos con- 
vexos: quanto menor o raio destes, maior 
a probabilidade de que o monitor seja 
de baixa qualidade). 

Todas as linhas aparecem nitidamen- 
te separadas umas das outras? Se isso 
não ocorrer, há problemas de definição 
na imagem, o que poderá preji judicar a 
legibilidade de textos. Em muitos mo- 
nitores e televisores, a resolução é me- 
lhor no sentido horizontal do que no ver- 
tical, ou vice-versa, devido à maneira 
como os pontos coloridos de fósforo são 
dispostos na tela, Monitores de boa qua- 
lidade têm resolução igual em todas as 
direções. 

Os círculos que o programa desenha 
não são perfeitos, tendendo a assumir 
uma forma ovalada? Este é um bom tes- 
te para uma das características dos vi- 
deos de boa qualidade, a chamada ra- 
zão de aspecto: para obtê-la, dividimos 
o diâmetro transversal do círculo pelo 
diâmetro vertical, Idealmente, é claro, 
o resultado deverá ser 1. 

Verifique também se as linhas apare- 
cem traçadas com nitidez ou se as bor- 


das e cantos parecem borrados. Um pro- 


blema desse tipo pode prejudicar a legi- 
bilidade de um texto na tela. 








E A IMAGEMESTÁ CENTRADA? 
a E DISTORÇÕES JUNTO ÀS BORDAS O ÀS BORDAS 
DEFINIÇÃO DA IMAGEM 

RAZÃO DE ASPECTO 


] 
im 
E DEFINIÇÃO DAS CORES 


Se o monitor ou TV for colorido, 
examine as cores das barras (ou das le- 
tras, no programa para o TRS-Color) na 
segunda parte do teste. Os cantos e bor- 
das das barras coloridas devem ser bem 
definidos, e a cor de uma barra não de- 
ve extravasar para outra. Como a den- 
sidade, brilho e a saturação das cores 
podem variar de vídeo para vídeo, ex- 
perimente mudar os controles do apa- 
relho, até obter a melhor combinação. 
Lembre-se de que diferentes ajustes de 
cor costumam ser necessários, confor- 
me a aplicação: texto puro, por exem- 
plo, requer pouca cor e brilho médio; 
um jogo exige muita cor e brilho. 

Os programas para o MSX e o TRS- 
Color permitem variar a cor de fundo na 
tela pressionando seguidamente a tecla 
<ENTER>, na última parte do progra- 
ma. Para interrompê-lo, pressione 
<BREAK> ou <CTRL> <STOP>. 

No Apple e no TK-2000, os caracte- 
res de texto não podem ser coloridos. 
Assim, para testar a qualidade do vídeo 
quanto a este aspecto, Interrompa o pro- 
grama e liste-o na tela. Observe se as le- 
tras aparecem em branco puro e se não 
há nenhum efeito de ““arco-íris”” (letras 
multicoloridas e borradas). 

Se você conhece um pouco de progra- 
mação gráfica em BASIC, não terá ne- 
nhuma dificuldade em modificar os pro- 
gramas aqui apresentados para torná-los 
mais completos ou atraentes. Procure 
alterar a combinação de cores de frente 
e de fundo, para verificar o efeito, gere 
mais uma tela de textos e caracteres grá- 
ficos etc. 


10 PMODE 4,1:PCLS:SCREEN 1,1 


20 FOR K=0 TO 1:FOR J=0 TO 15 S 
TEP K+2 
30 LINE (K*16+J,K*16+J)-(255-K* 


16-J,191-K*16-J), PSET,B 

40 NEXT J,K 

50 FOR K=100 TO 154 STEP 2:LINE 
(K,85)-(K,105), PSET:LINE(113,K- 
32)-(141,K-32), PSET:NEXT 

60 FOR K=1 TO 100 STEP 10:CIRCL 
70 IF INKEY$S="" THEN 70 


BO PMODE 1,1:PCLS:SCREEN 1,0 
90 FOR J=0 TO 191 STEP 48:COLOR 
J/48+1 





Padrões de teste de vídeo utilizados em diferentes computadores. 


100 LINE(0,J)-(255,J+47), PSET,B 
F:NEXT 

110 FOR J=0 TO 255 STEP 63:FOR 
K=0 TO 63 STEP 4:COLOR J/63+1 
120 LINE (K+J,0)-(K+J,191), PSET 
130 NEXT K,uJ 

140 IF INKEY$="" THEN 140 

150 S=1-S: SCREEN 1,8:GOTO 140 


5 FOR p=0 TO 7: FOR 1=0 TO 7 
+ IF p=i THEN GOTO 200 
6 PAPER p: INK i: BORDER O: 
CLS 
10 FOR n=0 TO 12 STEP 2: PLOT 
n.n: DRAW 0,175-2*n: DRAW 255 
-2kn,0: DAAW 0,-(175-2*n): 
DRAW -(255-2*n),0: NEXT n 
20 FOR n=10 TO 20 STEP 2: 
CIRCLE INK i:;128,85,n: NEXT 


n 
30 FOR n=5 TO 7: PRINT INK à 


“AT n,8;" ";AT n+10,8;" *: 
NEXT n 

40 PRINT AT 4,8;: FOR m=0 TO 
1: FOR n=0 TO 7: PRINT PAPER 
n;” ":: NEXT n: NEXT m 

50 PRINT AT 18,8;: FOR m=0 TO 
1: FOR n=0 TO 7: PRINT PAPER 
n;” "s:: NEXT n: NEXT m 

55 PRINT AT 2,4;: FOR n=0 TO 
2: FOR m=0 TO 7: PRINT INK m 
- PAPER p;CHARS (64+n*7+m);: 


NEXT m: NEXT n 


57 PRINT AT 19,4;: FOR n=0 TO 


2: FOR m=0 TO 7: PRINT 

BRIGHT 1; INK m; PAPER p;CHAS 
(64+n*7+m);: NEXT m: NEXT n 
60 FOR n=0 TO 7: BORPFR n: 
PAUSE 50: NEXT n: PAUSE 50 
200 NEXT 1: NEXT p 


10 9=8+1:COLOR 15,58,5:SCREEN 2 
15 CL=15:IF 8=15 THEN CL=l1 

20 FOR K=0 TO 1:FOR J=0 TO 15 5 
TEP K+2 

30 LINE (K*16+J,K*16+J)- (255-K*1 
6-J,191-K*16-J),CL,B 

ãO NEXT J,K 

50 FOR K=100 TO 154 STEP3:LINE( 
K,8B5)-(K,105),CL:NEXT 

55 FOR K=65 TO 135 STEP3:LINE(I 
40,K)-(114,K),CL:NEXT 

60 FOR K=1 TO 100 STEP 10:CIRCL 
E (127,95),K,CL:NEXT 

70 IF INKEYS="" THEN 70 

80 COLOR 15,8,S:SCREEN 2 

90 FOR J=0 TO 191 STEP 13 

100 LINE(0,J)-(255,J+11),J/13+1 
«BF :NEXT 

110 IF INKEYS="" THEN 110 

130 GoToO 10 


10 HGRZ :LX = 279:LY = 180 
20 FOR XO = O TO 20 STEP 4 





28 LET VO = XO:LXK = LX - 10:L%Y 
= LY - 10 

30 HPLOT X0,Y0 TO XO + LXK,YTO T 

OX) + LX,YO + LY TO XO,YO + LY 
TO XO,YO 

40 NEXT XO 

50 FOR Y = 60 TO 100 STEP 2 

55 HPLOT 110,Y TO 150,7 
57 HPLOT 50,Y TO 70,Y: 

90,Y TO 210,Y 

60 NEXT Y 

65 FOR X = 95 TO 165 STEP 3 
70 HPLOT X,6B TO X,93 

15 NEXT X 

B5 FOR AR = 10 TO 60 STEP 10 
B6  HPLOT 130 + R,8B0 

B7 FOR A = O TO 6.4 STEP .l 


HPLOT 1 


90 HPLOT TO 130 + R * Cos (A 
),80 + BR * SIN (A) 

95 NEXT A: NEXT R 

100 GET AS 

105 TEXT HOME 

110 GR :C=0 

120 FOR I = O TO 36 STEPÃSI3 

130 LET C = + 1: COLOR= C: V 
LIN 1,15 AT 1 

135 VLIN 1,215: AT E] + Lu VLIN à 
sas AE A" Z 

140 NEXT I:C = 0 

145 FOR J = 18 TO 36 STEP 2 
150 LET € = C + |: COLOR= C 
155 BHLIN 0,38 AT J: HLIN 0,938 
AT J + 1 

160 NEXT J 

190 GET AS 

200 TEXT HOME END 












“Envenene” seus programas de entrada 
de dados com uma rotina de 

grande versatilidade. Ela substitui 

com vantagem o comando INPUT, 
superando várias de suas limitações. 


O comando INPUT satisfaz a maio- 
ria das necessidades de programação de 
entrada de dados. Em certas situações, 
porém, a utilização desse comando apre- 
senta alguns sérios inconvenientes. En- 
tre eles, podemos citar: 

- toda vez que o programa executa um 
comando INPUT, o cursor muda de li- 
nha na tela quando o usuário pressiona 
a tecla < ENTERS; 
- um ponto de interrogação é sempre co- 
locado na tela (nos micros pertencentes 
às linhas TRS-80, TRS-Color e MSX), 
ou força a entrada na última linha (ca- 
so dos micros da linha Sinclair: ZX-81 
e Spectrum); 
- todos os caracteres digitados aparecem 
na tela: é impossível ocultá-los (como se 
faz, por exemplo, na entrada de uma se- 
nha secreta); 
- É necessário pressionar <ENTER> 
para terminar a entrada; 
- não existe nenhum controle sobre os 
caracteres que estão sendo digitados. Na 
linha TRS, por exemplo, se pressionar- 
mos a tecla de alimentação de linha (re- 
presentada pela flecha para baixo), pre- 
judicaremos a formatação de uma tela 
de entrada. 

possível contornar todos os proble- 
mas mencionados recorrendo a uma.ro- 
tina especial de entrada, que substitui o 
comando INPUT. 

Neste artigo, ensinaremos como de- 
senvolver essa rotina usando a função 
INKEYS, disponível no BASIC dos mi- 
cros pertencentes às linhas Sinclair, TRS 
e MSX, ou o comando GET, nos micros 
das linhas Apple e TK-2000. 





UMA ROTINA SIMPLES 


Inicialmente, vamos programar a ro- 
tina de entrada de dados da forma mais 
simples possível, para que você possa 
entendê-la sem dificuldade: 


IES 
CONTROLE A 
ENTRADA DE DADOS 





TU 


1000 LET 88="* 

1010 LET CS=INKEYS 

1020 IF CS="" TREN GOTO 1010 
1022 LET C=ASC(CS) 

1025 IF C=13 THEN RETURN 
1030 LET S3$=55+CS 

1040 PRINT CS; 

1060 GOTO 1010 


Modifique as seguintes linhas, para 
o micro ZX-81: 
1022 LET C=CODE CS 
1025 IF C=118 THEN RETURN 


Dao 


Suprima a linha 1020 e substitua a li- 
nha 1010, para o programa funcionar no 
Apple e no TK-2000: 


1010 GET cg 


Teste a rotina, acrescentando a este 
pequeno programa: 


ES Susan dó] 
10 PRINT 

90 PRINT "ENTRE: "; 

100 GOSUB 1000 

110 PRINT 

120 PRINT SS 

130 GOTO 10 


Para evitar problemas de “estouro” 
da área alfanumérica, acrescente esta li- 
nha para o TRS-80 e TR$8-Color: 


5 CLEAR 1000 
FUNCIONAMENTO DA ROTINA 


A linha 1000 inicializa a cadeia de saí- 
da, S$, que conterá tudo o que for digi- 
tado. As linhas 1010 e 1020 verificam se 
alguma tecla foi pressionada. Se a res- 
posta for negativa, O programa continua 
esperando. Caso contrário, o programa 
prossegue para a linha 1030, que testa 
se a tecla pressionada foi <ENTER > 
ou <RETURN>, que assinalam o fim 
da entrada de dados. Se foi outra tecla 
qualquer, ela é concatenada à cadeia de 











UMA ROTINA BÁSICA 
TESTANDO A ROTINA 
ME | OUTRAS TECLAS DE RETORNO 
o ENTRADAS SECRETAS 
MM ROTINA DE ENTRADA NUMERICA 


saída, na linha 1030, e impressa na li- 
nha 1040. Finalmente, o programa re- 
torna à linha 1010, para aguardar a pró- 
xima tecla. 





LIMITE PARA À ENTRADA 


Ao retornar da rotina, o cursor 
continua na mesma linha de entrada. A 
linha 100 força sua mudança para a li- 
nha seguinte, mas pode ser retirada, se 
necessário — por exemplo, se você esti- 
ver escrevendo um programa de forma- 
tação de tela de entrada, com vários 
campos da mesma linha. 

O programa principal pode ser mo- 
dificado de modo a colocar o cursor 
num ponto determinado da tela, antes 
de chamar a sub-rotina da linha 1000. 
Acrescente as seguintes linhas para ve- 
rificar o efeito obtido: 


APLICAÇÕES PARA A ROTINA 
À rotina apresentada neste artigo tem 


| variadas aplicações. Usando-a criativa- 


mente, você poderá trabalhar com diver- 
sas funções impossíveis de se obter com 
o BASIC. Essa rotina equivale, de fato, a 
um poderoso comando LINE INPUT que | 
alguns interpretadores possuem. | 
Em programas educativos e de jogos, | 
você pode incluir uma função de atraso 
máximo de tempo dentro da rotina de en- 
trada — ou seja, a cada repetição do la- 
ço de varredura (apenas para as versões 
com o comando INKEY$), uma variável 
T de tempo pode ser incrementada. Ao 
sair da rotina, o programa tem acesso ao 
T total, informando ao usuário o tempo 
que levou para entrar os dados. 
Outra aplicação interessante consis- 
te em sair automaticamente da rotina 
| quando um tempo máximo estipulado | 
para a resposta foi ultrapassado — o | 
que é últil em jogos de rapidez de ra- 
ciocínio, por exemplo. 











BO PRINT AT 10,10; 


B0 PRINT € 128,”"”; 
na 

80 LOCATE 10,10 
[ob [ci] 


80 HTAB 10:VTAB 10 





APERFEICOAMENTOS 





Como está, a rotina oferece poucos 
recursos e não apresenta vantagens de 
ordem significativa em relação ao co- 
mando INPUT. Mas existem várias ma- 
neiras de aperfeiçoá-la. Podemos, por 
exemplo, estabelecer um limite máximo 
para o número de caracteres que devem 
ser digitados, o que nos permitirá entrar 
dados sem a necessidade de pressionar 
a tecla <ENTER>. 

Acrescente esta linha à sub-rotina: 


ES ESpsnaby dito! 
1050 IF LEN(SS)=MX THEN RETURN 


A variável MX, que indica o tama- 
nho máximo do campo, deve ser espe- 
cificada antes de se chamar a rotina. Pa- 
ra testá-la, acrescente estas linhas ao 
programa principa:: 

20 PRINT "TAMANHO DO CAMPO ”"; 
30 INPUT MX 


Podemos ainda utilizar uma outra te- 
cla — como <SCAPE> — para con- 
cluir a entrada de dados. 

Substitua a linha 1025 por: 


ES ESasaabyiláilo!) 
1025 IF C=TX THEN RETURN 


Note que TX deve ser especificada 
pelo programa que chama a sub-rotina. 

Acrescente estas linhas, para testar a 
nova opção: 


40 PRINT "CODIGO DE TERMINO ”"; 
50 INPUT TX 


Uma rotina de entrada de dados tam- 
bém não estaria completa se não ofere- 
cesse ao usuário a possibilidade de cor- 
rigir erros, usando a tecla <BACKSPA- 
CE > ou <-. Adicione ao programa as 
| seguintes linhas: 





TITCUEIA 


1026 
1070 
1070 
1080 


1026 
1070 
1070 
1080 


1026 
THEN 
1070 
1080 


IF C=3 AND LEN(5$)>0 THEN 


LET S$=LEFTS(S$S,LEN(SS)-1) 
GoTo 1040 


IF C=B AND LEN(S$,>0 THEN 


LET SS$=SS(TO LEN(SS)-1) 
goto 1040 


IF C=114 AND LEN(5S$)2>20 
1070 

LET SS=S5S(TO LEN(SS)-1) 
GoTo 1040 


A linha 1026 verifica se a variável de 
saída já tem no mínimo um caractere e se 
a tecla de correção foi pressionada (códi- 
go ASCII 8; em se tratando do ZX-81, de- 
ve ser pressionada a tecla <-, cujo códi- 
go é 114). 

Em caso positivo, a rotina desvia pa- 
ra a linha 1070, que extrai o caractere 
apagado e vai para a linha 1040. Esta 
faz retornar o cursor, imprimindo-a so- 
bre a posição anterior. 


ENTRADAS SECRETAS 





Se quiser que os caracteres digitados 
não apareçam na tela — para a entrada 
de uma senha secreta, por exemplo —, 
substitua a linha 1040 por: 


ES ESunnaby dito! 


1040 IF SX=1 THEN PRINT CS; 


A variável SX indica se o caractere 
digitado deve ser mostrado (SX = 1) ou 
não (SX < >1). Para testar essa modi- 
ficação, acrescente as próximas linhas 
ao programa principal: 


60 PRINT "ENTRADA INVISIVEL 


(SIM=0) "; 
70 INPUT SX 


ENTRADAS NUMÉRICAS 





Podemos tornar nossa rotina de en- 
trada ainda mais versátil. Uma opção in- 
teressante consiste em utilizar a chama- 
da censura de entrada, por intermédio 
da qual fazemos com que a rotina igno- 
re automaticamente toda tecla que não 
esteja incluída dentro de um determina- 
do conjunto de entrada. Essa alternati- 
va nos permite estabelecer que todas as 
teclas sejam maiúsculas, ou que não o- 





O que faz a instrução LINE INPUT? 

Esta resposta é dirigida aos usuários 
de computadores TRS-BO (com BASIC 
nível Il), ZX-81, Sinclair, Apple e TK-2000. 
O BASIC padrão de suas máquinas não 
dispõe da instrução LINE INPUT, mas a 
sub-rotina apresentada neste artigo po- 
de substituí-la muito bem. 

Como o nome sugere, a instrução 
LINE INPUT permite a entrada de uma 
linha de texto pelo teclado. Essa linha 
é armazenada em uma variável literal 
ou string, nomeada pela instrução. Por 
exemplo: 


LINE INPUT X3 


Não podemos colocar outras variá- 
veis para entrada pela mesma instrução. 

Ao contrário da instrução INPUT, Ll- 
NE INPUT não imprime na tela o ponto 
de interrogação — sinal de prontidão 
para o usuário —, o que dá uma maior 
liberdade de programação. 

O LINE INPUT aceita uma linha de 
texto contendo vírgulas, pontos e vir- 
gulas e outras pontuações — que nos 
obrigariam ao uso de aspas, para deli- 

“ mitar o string de entrada, caso utilizás- 
semos uma instrução INPUT. Assim, é 

| ideal para a entrada em processamen- 
to de texto. 


corram certos caracteres, como vírgulas, 
ou, também, que a entrada seja apenas 
numérica. 

O procedimento é, na verdade, bas- 
tante simples. Para obter uma rotina de 
entrada numérica, por exemplo, basta 
que acrescentemos: 


—| TIT IS Ca 
1027 IF NOT (C>=43 AND C<=46) 


AND NOT (C>=4B AND C<=57) THEN 
GOTO 1020 


1027 IF C<>21 AND C<>22 AND 
C<>26 AND C< >27 AND NOT (C>=28 
AND C<=37) THEN GOTO 1020 

Essa linha verifica se o caractere en- 
trado está entre O e 9 ou se é um sinal 
de mais, de menos, vírgula ou ponto. Se 
não for um desses, retorna para a linha 
1020, de espera. 





LINHA 


Apple Il + 

Apple Il+ 
Apple Il + 
Apple Il + 
Apple Il + 
Apple ll + 
Apple + 
Apple ll+ 
Apple Il + 
Apple + 
Apple + 
Apple + 
Apple ll+ 
Apple ll + 
Apple ll+ 
Apple ll + 
Apple Il + 
Apple ll + 
Apple Il + 
Apple + 
Apple Hl+ 
Apple Il + 

Apple Il + 
Apple ll + 
Apple ll + 
Apple ll + 
Apple Il + 
Apple ll+ 
Apple lle 

Apple Ile 


Apple Ile 
MSX 


MSX 


FABRICANTE Po 


Appletronica 
CCE 

CPA 

CPA 

Digitus 
Dismac 
ENIAC 
Franklin 
Houston 
Magnex 
Maxitronica 
Maxitronica 
Maxitronica 
Maxitronica 
Microcraft 
Milmar 
Milmar 
Milmar 
Omega 
Polymax 
Polymax 
Spectrum 
Spectrum 
Suporte 
Sycomig 
Unitron 
Victor do Brasil 
Victor do Brasil 
Microcraft 
Microdigital 
Spectrum 
Gradiente 
Sharp 


MODELO 


Thor 2010 
MC-4000 Exato 
Absolutus 


| Polaris 


DGT-AP 
D-8100 
ENIACII 
Franklin 
Houston AP 
DMII 
MX-2001 
MX-48 

MX.64 
Maxitronic | 
Crafll Plus 
Apple Il Plus 
Apple Master 
Apple Senior 
MC-400 
Maxxi 

Poly Plus 
Microengenho | 
Spectrum ed 
Venus ll 

SICI 

API 

Elppa ll Plus 
Elppa Jr. 
Craftlle 
TK-3000 He 


"Microengenho ll 


Expert GPC4 
Hotbit HB-8000 


FABRICANTE 


Appletronica 
Apply 

CCE 

CPA 

CPA 
Codimex 
Digitus 
Digitus 
Digitus 
Dismac 
Dismac 
Dismac 
Dynacom 
ENIAC 
Engebras 
Filcres 
Pranklin 
Gradiente 
Houston 
Kemitron 
LNW 

LZ 

Magnex 
Maxitronica 
Maxitronica 
Maxitronica 
Maxitronica 
Microcraft 
Microcraft 
Microdigital 
Microdigital 
Microdigital 
Microdigital 


MODELO 


Thor 2010 
Apply 300 
MC-4000 Exato 
Absolutus 
Polaris 
CS-6508 
DGT100 
DGT-1000 
DGT.AP 
D-8000 
D-8001/2 
D-8100 
MX1600 
ENIACII 
AS+1000 
NEZ-8000 
Franklin 
Expert GPC1 
Houston AP 
Naja 800 
LNW-B0 
Color 64 
DMI 
MX-2001 
MX-48 
MX-64 
Maxitronic | 
Craft ll Plus 
Caftlle 
TK-3000 Ile 
TK-82C 
TK-83 

TK-85 


PAÍS 


Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 


Brasil 


Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
USA 

Brasil 
Brasil 
Brasil 
USA 

Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 


LINHA 


Apple Il+ 


o Sinclair ZX-81 


Apple ll + 
Apple + 
Apple ll + 
TRS-Color 
TRS-80 Mod.lil 
TRS-80 Mod.lil 
Apple + 
TRS-80 Mod.! 
TRS-80 Mod. 
Apple ll + 
TRS-Color 
Apple ll+ 
Sinclair ZX-81 
Sinclair ZX-81 
Apple ll + 
MSX 

Apple Il + 
TRS-80 Mod.lll 
TRS-80 Mod. | 
TRS-Color 
Apple Il + 
Apple Il + 
Apple Il + 
Apple Il + 
Apple ll + 
Apple Il+ 
Apple lle 
Apple lle 
Sinclair ZX-81 
Sinclair ZX-81 
Sinclair ZX-81 


Microdigital TK-90X Brasil 
Microdigital TKS-800 Brasil 


Sinclair Spectrum | 
TRS-Color 


Microdigital TK-90X 
Timex 2000 


Sinclair Spectrum 
Sinclair Spectrum Timex 


Sinclair ZX-81 
Sinclair ZX-81 
Sinclair ZX-81 
Sinclair ZX-81 
Sinclair ZX-81 
Sinclair ZX-81 
Sinclair ZX-81 
Sinclair ZX-81 
Sinclair ZX-81 
Sinclair ZX-81 
TRS-80 Mod.I 
TRS-80 Mod. | 
TRS-80 Mod. | 
TRS-80 Mod.! 
TRS-80 Mod.lil 
TRS-BO Mod.il 
TRS-80 Mod.lil 
TRS-80 Mod.lil 
TRS-80 Mod.lil 
TRS-80 Mod.lll 
TRS-80 Mod.lil 
TRS-80 Mod.IV 
TRS-80 Mod.IlV 
TRS-Color 
TRS-Color 
TRS-Color 
TRS-Color 
TRS-Color 


Apply 
Engebras 


“Filcres 


Microdigital 
Microdigital 
Microdigital 
Prologica 
Ritas 

Timex 
Timex 
Dismac 
Dismac 
LNW 

Video Genie 
Digitus 
Digitus 
Kemitron 
Prologica 
Prologica 
Sysdata 
Sysdata 
Multix 
Sysdata 
Codimex 
Dynacom 
LZ 
Microdigital 
Prologica 


Apply 300 
AS41000 
NEZ-8000 
TK-B2C 
TK-83. 
TK-85 
CP-200 
Ringo R-470 
Timex 1000 
Timex 1500 
D-8000 | 
D-8001/2 
LNW-80 
Video Genie | 
DGT100 
DGT-1000 
Naja 800 
CP-300 
CP-500 
Sysdata Ill 
Sysdata Jr. 
MX-Compacto 
Sysdata IV 
CS-6508 
MX-1600 
Color 64 
TKS-800 
CP-400 


Milmar 
Milmar 


“Milmar 


Multix 
Omega 
Polymax 
Polymax 
Prologica 
Prologica 
Prologica 
Prologica 
Ritas 

Sharp 
Spectrum 
Spectrum 
Spectrum 
Suporte 
Sycomig 
Sysdata 
Sysdata 
Sysdata 
Timex 
Timex 
Timex 
Unitron 
Victor do Brasil 
Victor do Brasil 
Video Genie 


Apple ll Plus 
Apple Master 
Apple Senior 
MX-Compacto 
MC-400 

Maxxi 

Poly Plus 
CP-200 

CP-300 

CP-400 

CP.500 

Ringo R-470 
Hotbit HB-8000 
Microengenho | 
Microengenho Il 
Spectrum ed 
Venus ll 

SICI 

Sysdata Ill 
Sysdata IV 
Sysdata Jr. 
Timex 1000 
Timex 1500 
Timex 2000 
APII 

Elppa Il Plus 
Elppa Jr. 

Video Genie! 


Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
USA 

USA 

USA 

Brasil 
Brasil 
Brasil 
USA 


Apple Il + 
Apple ll + 
Apple Il + 
TRS-B0 Mod.IV 
Apple Il + 
Apple Il + 
Apple l+ 
Sinclair ZX-81 
TRS-80 Mod.Ill 
TRS-Color 
TRS-80 Mod.lll 
Sinclair ZX-81 
MSX 

Apple Il+ 
Apple Ile 
Apple l+ 
Apple Il + 
Apple Il + 
TRS-80 Mod. 
TRS-80 Mod.IV 
TRS-80 Mod.lll 
Sinclair ZX-81 
Sinclair ZX-81 


Sinclair Spectrum 


Apple Il + 
Apple Il + 
Apple ll+ 
TRS-80 Mod. | 


EN an Tin macas 
é, UM LOGUTIE SI qi , 


“INPUT foi especialmente projetado para PN 
“ microcomputadores compatíveis com as sete principais Sinclair E TARSO TK:2000 MSX 


“linhas existentes no mercado. 
ba, então emp a sr 


“Os blocos de textos e listagens de programas po pera 
Eme renes E UM [06] Semp e 
; identificados por meio dos seguintes sim os: TRS-Color pune dl 


ED Dm me eee mo meto mm o em em 








PE 


= ms 


TT E TI DCE E EE Di SS) 


INnnNO PRÓXIMO NÚMERONHHEHEEHHHI! 


APLICAÇÕES 


Você quer saber o que o destino lhe reserva? Consulte os 
astros... ou melhor, o programa de horóscopo de /NPUT. 


CÓDIGO DE MÁQUINA 
Avalanche está completo. Para que o jogo comece, falta 
apenas a rotina final, que comanda toda a ação. 





PROGRAMAÇÃO DE JOGOS e 2 
Você é capaz de pintar uma parede sem deixar cair tinta no 
carpete? Teste sua habilidade no jogo O Pintor Aloprado. 


PROGRAMAÇÃO BASIC 
Conheça algumas rotinas capazes de simplificar 
a manipulação de datas em BASIC. 


ho ' 





